From 367bc2d198f57bc34522441820f761b61fed0ce0 Mon Sep 17 00:00:00 2001 From: Efraim Flashner Date: Tue, 23 Jan 2024 11:54:03 +0200 Subject: gnu: source-highlight: Wrap scripts. * gnu/packages/pretty-print.scm (source-highlight)[arguments]: Add a phase to wrap shell scripts so they can find the source-hightlight binary. [inputs]: Add guile-3.0. Change-Id: Ia8d006d969385210d5c82b4a0dd1f78178306ac2 --- gnu/packages/pretty-print.scm | 15 ++++++++++++--- 1 file changed, 12 insertions(+), 3 deletions(-) (limited to 'gnu') diff --git a/gnu/packages/pretty-print.scm b/gnu/packages/pretty-print.scm index 34d413f8c9..8afe73da45 100644 --- a/gnu/packages/pretty-print.scm +++ b/gnu/packages/pretty-print.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2016, 2019, 2020 Efraim Flashner +;;; Copyright © 2016, 2019, 2020, 2024 Efraim Flashner ;;; Copyright © 2016, 2021 Ricardo Wurmus ;;; Copyright © 2017 Marius Bakke ;;; Copyright © 2017, 2020, 2021 Ludovic Courtès @@ -47,6 +47,7 @@ #:use-module (gnu packages ghostscript) #:use-module (gnu packages gperf) #:use-module (gnu packages groff) + #:use-module (gnu packages guile) #:use-module (gnu packages gv) #:use-module (gnu packages llvm) #:use-module (gnu packages lua) @@ -304,7 +305,7 @@ a fast alternative to @code{IOStreams}.") ;; The ctags that comes with emacs does not support the --excmd options, ;; so can't be used (inputs - (list boost)) + (list boost guile-3.0)) (native-inputs (list bison flex)) (arguments @@ -336,7 +337,15 @@ a fast alternative to @code{IOStreams}.") (substitute* '("tests/test.sh.html" "tests/test2.sh.html" "tests/test.tcl.html") - (("#! */bin/sh") "#!/bin/sh"))))))) + (("#! */bin/sh") "#!/bin/sh")))) + (add-after 'install 'wrap-scripts + (lambda* (#:key outputs #:allow-other-keys) + (for-each + (lambda (script) + (wrap-script (string-append #$output "/bin/" script) + `("PATH" ":" prefix (,(string-append #$output "/bin"))))) + (list "cpp2html" "java2html" "source-highlight-esc.sh" + "src-hilite-lesspipe.sh"))))))) (home-page "https://www.gnu.org/software/src-highlite/") (synopsis "Produce a document with syntax highlighting from a source file") (description -- cgit v1.2.3