From 10e792b16339fc2d4b66d8985b1cbf85e2626587 Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Mon, 27 Feb 2023 13:17:24 -0300 Subject: etc/guix/system.scm: Improve indentation of epson-L365 --- etc/guix/system.scm | 49 +++++++++++++++++++++++++------------------------ 1 file changed, 25 insertions(+), 24 deletions(-) diff --git a/etc/guix/system.scm b/etc/guix/system.scm index f9aebde6..34cd4038 100644 --- a/etc/guix/system.scm +++ b/etc/guix/system.scm @@ -70,31 +70,32 @@ (list #:phases #~(modify-phases %standard-phases - (replace 'unpack - (lambda* (#:key outputs #:allow-other-keys) - (mkdir "source") - (chdir "source") - (system (string-append "rpm2cpio " #$source " | cpio -idv")) - (invoke "tar" "-xvf" (string-append "epson-inkjet-printer-201401w-" #$version ".tar.gz")) - (invoke "tar" "-xvf" (string-append "epson-inkjet-printer-filter-" #$version ".tar.gz")) - (substitute* (find-files (string-append "epson-inkjet-printer-201401w-" #$version "/ppds/")) - (("/opt/epson-inkjet-printer-201401w/cups/lib") - (string-append (assoc-ref outputs "out") - "/lib/cups"))) - (chdir (string-append "epson-inkjet-printer-filter-" #$version)))) - (add-after 'install 'install-extra-files - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (model-dir (string-append out "/share/cups/model/epson-inkjet-printer-201401w"))) - (chdir (string-append "../epson-inkjet-printer-201401w-" #$version)) - (mkdir-p model-dir) - (invoke "cp" "-a" "ppds" model-dir) - (invoke "cp" "-a" "lib64" "resource" "watermark" out))))))) + (replace 'unpack + (lambda* (#:key outputs #:allow-other-keys) + (mkdir "source") + (chdir "source") + (system (string-append "rpm2cpio " #$source " | cpio -idv")) + (invoke "tar" "-xvf" (string-append "epson-inkjet-printer-201401w-" #$version ".tar.gz")) + (invoke "tar" "-xvf" (string-append "epson-inkjet-printer-filter-" #$version ".tar.gz")) + (substitute* (find-files (string-append "epson-inkjet-printer-201401w-" #$version "/ppds/")) + (("/opt/epson-inkjet-printer-201401w/cups/lib") + (string-append (assoc-ref outputs "out") + "/lib/cups"))) + (chdir (string-append "epson-inkjet-printer-filter-" #$version)))) + (add-after 'install 'install-extra-files + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (model-dir (string-append out "/share/cups/model/epson-inkjet-printer-201401w"))) + (chdir (string-append "../epson-inkjet-printer-201401w-" #$version)) + (mkdir-p model-dir) + (invoke "cp" "-a" "ppds" model-dir) + (invoke "cp" "-a" "lib64" "resource" "watermark" out))))))) (native-inputs - (list cpio - cups-minimal - libjpeg-turbo - rpm)) + (list + cpio + cups-minimal + libjpeg-turbo + rpm)) (synopsis "Epson printer driver (L456, L455, L366, L365, L362, L360, L312, L310, L222, L220, L132, L130)") (description -- cgit v1.3