[bug#68556,gnome-team,02/25] gnu: gnome-shell-extension-hide-app-icon: Modernize style.
Commit Message
* gnu/packages/gnome-xyz.scm (gnome-shell-extension-hide-app-icon)
[arguments]: Convert to list of G-Expressions.
Change-Id: Ifd937163d7e7fce95c4bed1a2a856487ed225d2d
---
gnu/packages/gnome-xyz.scm | 27 +++++++++++++--------------
1 file changed, 13 insertions(+), 14 deletions(-)
@@ -870,20 +870,19 @@ (define-public gnome-shell-extension-hide-app-icon
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(arguments
- '(#:tests? #f ; no test target
- #:make-flags (list (string-append "EXTENSIONS_DIR="
- (assoc-ref %outputs "out")
- "/share/gnome-shell/extensions"))
- #:phases
- (modify-phases %standard-phases
- (delete 'configure) ; no configure script
- (replace 'install
- (lambda* (#:key outputs #:allow-other-keys)
- (let ((out (assoc-ref outputs "out"))
- (pre "/share/gnome-shell/extensions/")
- (dir "hide-app-icon@mrapp.sourceforge.com"))
- (copy-recursively dir (string-append out pre dir))
- #t))))))
+ (list
+ #:tests? #f ; no test target
+ #:make-flags #~(list (string-append "EXTENSIONS_DIR="
+ #$output
+ "/share/gnome-shell/extensions"))
+ #:phases
+ #~(modify-phases %standard-phases
+ (delete 'configure) ; no configure script
+ (replace 'install
+ (lambda _
+ (let ((pre "/share/gnome-shell/extensions/")
+ (dir "hide-app-icon@mrapp.sourceforge.com"))
+ (copy-recursively dir (string-append #$output pre dir))))))))
(native-inputs
(list `(,glib "bin") intltool))
(propagated-inputs