unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
From: aecepoglu <aecepoglu@fastmail.fm>
To: 45440@debbugs.gnu.org
Subject: [bug#45440] [PATCH] gnu: Add boxes.
Date: Sat, 26 Dec 2020 01:57:48 +0300	[thread overview]
Message-ID: <20201225225748.hm4avfcfo3sk2lgg@minitower> (raw)

* gnu/packages/shellutils.scm (boxes): New variable.
---
 gnu/packages/shellutils.scm | 42 +++++++++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)

diff --git a/gnu/packages/shellutils.scm b/gnu/packages/shellutils.scm
index 181a640475..9d94129c40 100644
--- a/gnu/packages/shellutils.scm
+++ b/gnu/packages/shellutils.scm
@@ -34,6 +34,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 +45,46 @@
   #: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 "Command line filter program that draws ASCII art boxes
+arnd your input text")
+   (home-page "https://boxes.thomasjensen.com/build.html")
+   (license license:gpl2)))
+
 (define-public zsh-autosuggestions
   (package
     (name "zsh-autosuggestions")
-- 
2.29.2





             reply	other threads:[~2020-12-25 23:38 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2020-12-25 22:57 aecepoglu [this message]
2021-01-04 10:54 ` bug#45440: [PATCH] gnu: Add boxes Ludovic Courtès

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://guix.gnu.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20201225225748.hm4avfcfo3sk2lgg@minitower \
    --to=aecepoglu@fastmail.fm \
    --cc=45440@debbugs.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).