From f9fd3752f6956b5654884036823fde5ef235b51a Mon Sep 17 00:00:00 2001 From: Clément Lassieur Date: Tue, 21 Sep 2021 12:24:14 +0200 Subject: gnu: josm: Fix .desktop file. * gnu/packages/geo.scm (josm)[arguments]: In 'install-share-directories' phase, change org-openstreetmap-josm-MainApplication to org-openstreetmap-josm-gui-MainApplication. --- gnu/packages/geo.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'gnu/packages/geo.scm') diff --git a/gnu/packages/geo.scm b/gnu/packages/geo.scm index 791fd5f1b6..9d4a1a8955 100644 --- a/gnu/packages/geo.scm +++ b/gnu/packages/geo.scm @@ -1524,14 +1524,17 @@ (define-public josm (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out")) (share-directories '("applications" "icons" "man" "menu" - "metainfo" "mime" "pixmaps"))) + "metainfo" "mime" "pixmaps")) + (desktop "org.openstreetmap.josm.desktop")) (for-each (lambda (directory) (copy-recursively (string-append "native/linux/tested/usr/share/" directory) (string-append out "/share/" directory))) - share-directories)) + share-directories) + (substitute* (string-append out "/share/applications/" desktop) + (("josm-MainApplication") "josm-gui-MainApplication"))) #t)) (add-after 'install 'install-bin (lambda* (#:key outputs inputs #:allow-other-keys) -- cgit v1.2.3