mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-13 22:50:23 -05:00
gnu: distrobox: Patch distrobox-generate-entry.
Avoids keeping store references in generated desktop files. * gnu/packages/containers.scm (distrobox)<arguments>: add 'patch-distrobox-generate-entry phase. Change-Id: Ib1bffaefa1805accb5227c289c9fc985853bc675 Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
d1d70d25c8
commit
1fa4d658d8
1 changed files with 8 additions and 0 deletions
|
@ -174,6 +174,14 @@ (define-public distrobox
|
||||||
(arguments
|
(arguments
|
||||||
(list #:phases
|
(list #:phases
|
||||||
#~(modify-phases %standard-phases
|
#~(modify-phases %standard-phases
|
||||||
|
;; This script creates desktop files but when the store path for
|
||||||
|
;; distrobox changes it leaves the stale path on the desktop
|
||||||
|
;; file, so remove the path to use the profile's current
|
||||||
|
;; distrobox.
|
||||||
|
(add-after 'unpack 'patch-distrobox-generate-entry
|
||||||
|
(lambda _
|
||||||
|
(substitute* "distrobox-generate-entry"
|
||||||
|
(("\\$\\{distrobox_path\\}/distrobox") "distrobox"))))
|
||||||
;; Use WRAP-SCRIPT to wrap all of the scripts of distrobox,
|
;; Use WRAP-SCRIPT to wrap all of the scripts of distrobox,
|
||||||
;; excluding the host side ones.
|
;; excluding the host side ones.
|
||||||
(add-after 'install 'wrap-scripts
|
(add-after 'install 'wrap-scripts
|
||||||
|
|
Loading…
Reference in a new issue