From 555d53d486c58aa79d6ef0fd90e66a2d7d46595c Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Sun, 24 Jul 2022 02:00:03 +0200 Subject: [PATCH] gnu: libmtp: Use G-expressions. * gnu/packages/libusb.scm (libmtp)[arguments]: Rewrite as G-expressions. --- gnu/packages/libusb.scm | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/gnu/packages/libusb.scm b/gnu/packages/libusb.scm index 26eb296c21..8a5967f7b4 100644 --- a/gnu/packages/libusb.scm +++ b/gnu/packages/libusb.scm @@ -28,6 +28,7 @@ ;;; along with GNU Guix. If not, see . (define-module (gnu packages libusb) + #:use-module (guix gexp) #:use-module (gnu packages) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) @@ -488,11 +489,9 @@ (define-public libmtp ;; libmtp.pc refers to all these. (list libusb)) (arguments - `(#:configure-flags - (list "--disable-static" - (string-append "--with-udev=" - (assoc-ref %outputs "out") - "/lib/udev")))) + (list #:configure-flags + #~(list "--disable-static" + (string-append "--with-udev=" #$output "/lib/udev")))) (home-page "http://libmtp.sourceforge.net/") (synopsis "Library implementing the Media Transfer Protocol") (description "Libmtp implements an MTP (Media Transfer Protocol)