guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

04/06: gnu: shellcheck: Generate and install man page.


From: guix-commits
Subject: 04/06: gnu: shellcheck: Generate and install man page.
Date: Fri, 2 Jul 2021 14:57:59 -0400 (EDT)

nckx pushed a commit to branch master
in repository guix.

commit 83da1cb65a3470a7240574320fff7d35f8a50300
Author: Morgan Smith <Morgan.J.Smith@outlook.com>
AuthorDate: Fri Jul 2 14:10:02 2021 -0400

    gnu: shellcheck: Generate and install man page.
    
    * gnu/packages/haskell-apps.scm (shellcheck)
    [arguments]<#:phases>: Add build-man-page and install-man-page phases.
    [native-inputs]: Add pandoc.
    
    Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>
---
 gnu/packages/haskell-apps.scm | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/gnu/packages/haskell-apps.scm b/gnu/packages/haskell-apps.scm
index ebf7f5e..5260326 100644
--- a/gnu/packages/haskell-apps.scm
+++ b/gnu/packages/haskell-apps.scm
@@ -17,6 +17,7 @@
 ;;; Copyright © 2020 Brian Leung <bkleung89@gmail.com>
 ;;; Copyright © 2021 EuAndreh <eu@euandre.org>
 ;;; Copyright © 2021 Stefan Reichör <stefan@xsteve.at>
+;;; Copyright © 2021 Morgan Smith <Morgan.J.Smith@outlook.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -857,6 +858,19 @@ too slow and you'll get wound up in the scroll and 
crushed.")
         (base32 "06m4wh891nah3y0br4wh3adpsb16zawkb2ijgf1vcz61fznj6ps1"))
        (file-name (string-append name "-" version ".tar.gz"))))
     (build-system haskell-build-system)
+    (arguments
+     '(#:phases
+       (modify-phases %standard-phases
+         (add-after 'build 'build-man-page
+           (lambda _
+             (invoke "./manpage")))
+         (add-after 'install 'install-man-page
+           (lambda* (#:key outputs #:allow-other-keys)
+             (install-file "shellcheck.1"
+                           (string-append (assoc-ref outputs "out")
+                                          "/share/man/man1/")))))))
+    (native-inputs
+     `(("pandoc" ,pandoc)))
     (inputs
      `(("ghc-aeson" ,ghc-aeson)
        ("ghc-diff" ,ghc-diff)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]