summaryrefslogtreecommitdiff
path: root/gnu/packages/suckless.scm
diff options
context:
space:
mode:
authorng0 <ng0@libertad.pw>2017-01-12 00:39:34 +0000
committerLeo Famulari <leo@famulari.name>2017-01-13 14:13:05 -0500
commit0318305cdb5840e85df751fe682b2e9a78d5002f (patch)
tree29c0b7adc3917b1a2021e8848967dbbb3689cddf /gnu/packages/suckless.scm
parent37d5fc7b5ae359f0eca4bef97a41c65a741f0e39 (diff)
gnu: Add lchat.
* gnu/packages/suckless.scm (lchat): New variable. Signed-off-by: Leo Famulari <leo@famulari.name>
Diffstat (limited to 'gnu/packages/suckless.scm')
-rw-r--r--gnu/packages/suckless.scm52
1 files changed, 51 insertions, 1 deletions
diff --git a/gnu/packages/suckless.scm b/gnu/packages/suckless.scm
index 13b6b2a141..868939b90a 100644
--- a/gnu/packages/suckless.scm
+++ b/gnu/packages/suckless.scm
@@ -43,7 +43,9 @@
#:use-module (gnu packages compression)
#:use-module (gnu packages cups)
#:use-module (gnu packages ncurses)
- #:use-module (gnu packages gawk))
+ #:use-module (gnu packages gawk)
+ #:use-module (gnu packages base)
+ #:use-module (gnu packages libbsd))
(define-public dwm
(package
@@ -623,3 +625,51 @@ fullrune(s,n) ? chartorune(p,s): 0.
as -1, to be used instead of U+FFFD.
@end itemize\n")
(license license:expat))))
+
+;; No release tarballs so far.
+(define-public lchat
+ (let ((revision "1")
+ (commit "bbde23732f8c7769b982f0c1bda9b99fbf93f932"))
+ (package
+ (name "lchat")
+ (version (string-append "0.0.0-" revision "." (string-take commit 7)))
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/younix/lchat")
+ (commit commit)))
+ (file-name (string-append name "-" version "-checkout"))
+ (sha256
+ (base32
+ "00q3rc0aa5416jvjvrj71x1wnr0331kxhvjjs7pyxgnq4xf36k63"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f ; No tests
+ #:make-flags (list "CC=gcc"
+ (string-append "PREFIX=" %output))
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure) ; No configure script
+ (add-before 'build 'libbsd
+ (lambda _
+ (substitute* "Makefile"
+ (("-lutf") "-lutf -lbsd"))))
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (bin (string-append out "/bin")))
+ (install-file "lchat" bin)
+ #t))))))
+ (inputs
+ `(("grep" ,grep)
+ ("ncurses" ,ncurses)
+ ("libutf" ,libutf)
+ ("libbsd" ,libbsd)))
+ (home-page "https://github.com/younix/lchat")
+ (synopsis "Line chat is a frontend for the irc client ii from suckless")
+ (description
+ "Lchat (line chat) is the little and small brother of cii.
+It is a front end for ii-like chat programs. It uses tail(1) -f to get the
+chat output in background.")
+ (license license:isc))))