aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authoraecepoglu <aecepoglu@fastmail.fm>2020-12-26 01:57:48 +0300
committerLudovic Courtès <ludo@gnu.org>2021-01-04 11:51:48 +0100
commit729f582a830dc03a509d1e3ad28bac1d43ba6e2e (patch)
tree20755d787687dd4a08ebefd0e8c791a9bc1bb78b
parent0aed31be661fc6d8811525d7bb7c4a30237ea2c6 (diff)
downloadguix-729f582a830dc03a509d1e3ad28bac1d43ba6e2e.tar.gz
guix-729f582a830dc03a509d1e3ad28bac1d43ba6e2e.zip
gnu: Add boxes.
* gnu/packages/shellutils.scm (boxes): New variable. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--gnu/packages/shellutils.scm42
1 files changed, 42 insertions, 0 deletions
diff --git a/gnu/packages/shellutils.scm b/gnu/packages/shellutils.scm
index 181a640475..44a1934610 100644
--- a/gnu/packages/shellutils.scm
+++ b/gnu/packages/shellutils.scm
@@ -7,6 +7,7 @@
;;; Copyright © 2018 Benjamin Slade <slade@jnanam.net>
;;; Copyright © 2019 Collin J. Doering <collin@rekahsoft.ca>
;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
+;;; Copyright © 2020 aecepoglu <aecepoglu@fastmail.fm>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -34,6 +35,8 @@
#:use-module (guix build-system python)
#:use-module (gnu packages autotools)
#:use-module (gnu packages base)
+ #:use-module (gnu packages bison)
+ #:use-module (gnu packages flex)
#:use-module (gnu packages golang)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages pkg-config)
@@ -43,6 +46,45 @@
#:use-module (gnu packages shells)
#:use-module (gnu packages tmux))
+(define-public boxes
+ (package
+ (name "boxes")
+ (version "1.3")
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/ascii-boxes/boxes")
+ (commit (string-append "v" version))))
+ (file-name (git-file-name name version))
+ (sha256
+ "0b12rsynrmkldlwcb62drk33kk0aqwbj10mq5y5x3hjf626gjwsi")))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:test-target "test"
+ #:make-flags (list (string-append "GLOBALCONF="
+ (assoc-ref %outputs "out")
+ "/etc/boxes-config"))
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((dest (assoc-ref outputs "out")))
+ (for-each (lambda (x)
+ (install-file (car x)
+ (string-append dest "/" (cdr x))))
+ '(("src/boxes" . "bin")
+ ("doc/boxes.1" . "share/man/man1")
+ ("boxes-config" . "etc/")))
+ #t))))))
+ (native-inputs `(("flex" ,flex) ("bison" ,bison)))
+ (synopsis "Command line ASCII boxes")
+ (description
+ "This command-line filter program draws ASCII-art boxes around your input
+text.")
+ (home-page "https://boxes.thomasjensen.com/build.html")
+ (license license:gpl2)))
+
(define-public zsh-autosuggestions
(package
(name "zsh-autosuggestions")