me
/
guix
Archived
1
0
Fork 0
Code

gnu: xmlstarlet: Install symlink to xmlstarlet binary. 

* gnu/packages/xml.scm (xmlstarlet)[arguments]: Add 'symlink-xmlstarlet
phase.
master
Pierre Langlois 2020-11-08 11:18:11 +00:00
parent cab2ddb4c8
commit b04198a147
No known key found for this signature in database
GPG Key ID: A8FC9E447F4F7D54
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
gnu/packages/xml.scm
View File

@ -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)))