diff options
| author | Pierre Langlois <pierre.langlois@gmx.com> | 2020-11-08 11:18:11 +0000 |
|---|---|---|
| committer | Pierre Langlois <pierre.langlois@gmx.com> | 2020-11-19 20:00:08 +0000 |
| commit | b04198a1477f9d685d674a1dcc81b79b530fc409 (patch) | |
| tree | d8fe066140e4f1e18c23f97211da63ab396fd9f4 | |
| parent | cab2ddb4c83bc77b7290b7ba40f032a2ae4fc22c (diff) | |
gnu: xmlstarlet: Install symlink to xmlstarlet binary.
* gnu/packages/xml.scm (xmlstarlet)[arguments]: Add 'symlink-xmlstarlet
phase.
| -rw-r--r-- | gnu/packages/xml.scm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/gnu/packages/xml.scm b/gnu/packages/xml.scm index 0fbcb1344d..1db3c2ead1 100644 --- a/gnu/packages/xml.scm +++ b/gnu/packages/xml.scm @@ -25,6 +25,7 @@ ;;; Copyright © 2020 Paul Garlick <pgarlick@tourbillion-technology.com> ;;; Copyright © 2020 Edouard Klein <edk@beaver-labs.com> ;;; Copyright © 2020 Brett Gilio <brettg@gnu.org> +;;; Copyright © 2020 Pierre Langlois <pierre.langlois@gmx.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -1260,7 +1261,15 @@ C++ programming language.") (substitute* "Makefile" (("^examples/schema1\\\\") "\\") (("^examples/valid1\\\\") "\\")) - #t))))) + #t)) + (add-after 'install 'symlink-xmlstarlet + (lambda* (#:key outputs #:allow-other-keys) + ;; Other distros usually either rename or symlink the `xml' binary + ;; as `xmlstarlet', let's do it as well for compatibility. + (let* ((out (assoc-ref outputs "out")) + (bin (string-append out "/bin"))) + (symlink "xml" (string-append bin "/xmlstarlet")) + #t)))))) (inputs `(("libxslt" ,libxslt) ("libxml2" ,libxml2))) |