summary refs log tree commit diff
path: root/gnu/packages
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2022-09-13 23:05:18 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2022-09-13 23:07:06 +0200
commitebbf77bf49d4ae80c6d216d949dfd1826dfd3ec4 (patch)
tree5787b6775036d164c20781bbfe7de6fdb8fab178 /gnu/packages
parentb6a633920df79135cab3b0ab6167cd7662627117 (diff)
downloadguix-ebbf77bf49d4ae80c6d216d949dfd1826dfd3ec4.tar.gz
gnu: gammastep: Improve package style.
* gnu/packages/xdisorg.scm (gammastep)[arguments]: Use G-expressions.
Diffstat (limited to 'gnu/packages')
-rw-r--r--gnu/packages/xdisorg.scm22
1 files changed, 11 insertions, 11 deletions
diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index 0ec3b81df3..c017085353 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -1593,17 +1593,17 @@ to an arbitrary balanced color.")
         (base32 "1rcciccnwhxh97wlr9gcirdxv33za369jsrgrfzcp3042824pm8i"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'install 'wrap-python-and-typelib
-           (lambda* (#:key outputs #:allow-other-keys)
-             ;; Gammastep GUI needs Typelib files from GTK and access
-             ;; to Python libraries.
-             (wrap-program (string-append (assoc-ref outputs "out")
-                                          "/bin/gammastep-indicator")
-               `("PYTHONPATH" ":" prefix (,(getenv "GUIX_PYTHONPATH")))
-               `("GI_TYPELIB_PATH" ":" prefix
-                 (,(getenv "GI_TYPELIB_PATH")))))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'wrap-python-and-typelib
+            (lambda _
+              ;; Gammastep GUI needs Typelib files from GTK and access to
+              ;; Python libraries.
+              (wrap-program (string-append #$output "/bin/gammastep-indicator")
+                `("PYTHONPATH" ":" prefix (,(getenv "GUIX_PYTHONPATH")))
+                `("GI_TYPELIB_PATH" ":" prefix
+                  (,(getenv "GI_TYPELIB_PATH")))))))))
     (native-inputs
      (list autoconf
            automake