gnu: sedsed: Symlink after wrapping.
Drop unused .sedsed-real symlink and avoid sedsed → sedsed.py → .sedsed.py-real exec chain. * gnu/packages/admin.scm (sedsed)[arguments]: Move ‘symlink’ phase after ‘wrap’.
This commit is contained in:
parent
ec40227b2c
commit
b7e26ec695
|
@ -2492,14 +2492,14 @@ in order to be able to find it.
|
||||||
;; Just one file to copy around
|
;; Just one file to copy around
|
||||||
(install-file "sedsed.py" bin)
|
(install-file "sedsed.py" bin)
|
||||||
#t)))
|
#t)))
|
||||||
(add-after 'install 'symlink
|
(add-after 'wrap 'symlink
|
||||||
;; Create 'sedsed' symlink to "sedsed.py".
|
;; Create 'sedsed' symlink to "sedsed.py".
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
(let* ((out (assoc-ref outputs "out"))
|
(let* ((out (assoc-ref outputs "out"))
|
||||||
(bin (string-append out "/bin"))
|
(bin (string-append out "/bin"))
|
||||||
(sed (string-append bin "/sedsed"))
|
(sed (string-append bin "/sedsed"))
|
||||||
(sedpy (string-append bin "/sedsed.py")))
|
(sedpy (string-append bin "/sedsed.py")))
|
||||||
(symlink sedpy sed)
|
(symlink sedpy sed)
|
||||||
#t))))))
|
#t))))))
|
||||||
(home-page "http://aurelio.net/projects/sedsed")
|
(home-page "http://aurelio.net/projects/sedsed")
|
||||||
(synopsis "Sed sed scripts")
|
(synopsis "Sed sed scripts")
|
||||||
|
|
Loading…
Reference in New Issue