diff options
author | jgart <jgart@dismail.de> | 2024-08-25 09:00:27 -0500 |
---|---|---|
committer | jgart <jgart@dismail.de> | 2024-08-25 09:06:31 -0500 |
commit | c62b729b3ec61958b0a883d82ef45a4a45733690 (patch) | |
tree | f2b0c92355467fc063d8ef9f34435ca52b9733df /gnu | |
parent | 4a1114de7868b39e17d21c20ecdfa7c4e7b82213 (diff) | |
download | guix-c62b729b3ec61958b0a883d82ef45a4a45733690.tar guix-c62b729b3ec61958b0a883d82ef45a4a45733690.tar.gz |
gnu: pantheon-terminal: Use gexp modern style.
* gnu/packages/pantheon.scm (pantheon-terminal) [arguments]: Use gexp modern
style.
Change-Id: I74d12ec09d8385f2093af91909963c934f9ca968
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/pantheon.scm | 29 |
1 files changed, 15 insertions, 14 deletions
diff --git a/gnu/packages/pantheon.scm b/gnu/packages/pantheon.scm index 463b6662f0..eaaf70c624 100644 --- a/gnu/packages/pantheon.scm +++ b/gnu/packages/pantheon.scm @@ -213,20 +213,21 @@ also be used on others.") "0x3gzghnfx4a1q2zhra4dysc0pm1zvlfdxj96qhfb627pz16iv4k")))) (build-system meson-build-system) (arguments - `(#:tests? #f ; Tests invole launching the terminal. - #:glib-or-gtk? #t - #:phases (modify-phases %standard-phases - (add-before 'install 'set-environment-variables - (lambda _ - ;; Disable compiling schemas and updating desktop databases - (setenv "DESTDIR" "/"))) - (add-after 'install 'install-symlinks - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (bin (string-append out - "/bin/io.elementary.terminal")) - (link (string-append out "/bin/pantheon-terminal"))) - (symlink bin link))))))) + (list + #:tests? #f ; Tests invole launching the terminal. + #:glib-or-gtk? #t + #:phases + #~(modify-phases %standard-phases + (add-before 'install 'set-environment-variables + (lambda _ + ;; Disable compiling schemas and updating desktop databases + (setenv "DESTDIR" "/"))) + (add-after 'install 'install-symlinks + (lambda* (#:key outputs #:allow-other-keys) + (let* ((bin (string-append #$output + "/bin/io.elementary.terminal")) + (link (string-append #$output "/bin/pantheon-terminal"))) + (symlink bin link))))))) (native-inputs (list appstream desktop-file-utils ;required for tests gettext-minimal ;for msgfmt |