summaryrefslogtreecommitdiff
path: root/gnu/packages/cups.scm
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2022-05-01 02:00:00 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2022-05-01 02:00:18 +0200
commitad99a09abe7cd58e15064f1c3f72ca1712bb290f (patch)
tree18a2e737b7bc73c98ccc88e949124f2248d21bfa /gnu/packages/cups.scm
parent20456fd016a78d396f2a8f0c347de728167f0d99 (diff)
downloadguix-ad99a09abe7cd58e15064f1c3f72ca1712bb290f.tar.gz
guix-ad99a09abe7cd58e15064f1c3f72ca1712bb290f.tar.xz
gnu: epson-inkjet-printer-escpr: Use new style.
* gnu/packages/cups.scm (epson-inkjet-printer-escpr)[arguments]: Rewrite with (guix gexp). [inputs]: Use new style.
Diffstat (limited to 'gnu/packages/cups.scm')
-rw-r--r--gnu/packages/cups.scm58
1 files changed, 27 insertions, 31 deletions
diff --git a/gnu/packages/cups.scm b/gnu/packages/cups.scm
index 7f30ea8518..617a89d954 100644
--- a/gnu/packages/cups.scm
+++ b/gnu/packages/cups.scm
@@ -53,6 +53,7 @@
#:use-module (guix build-system python)
#:use-module (guix download)
#:use-module (guix git-download)
+ #:use-module (guix gexp)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (guix utils)
@@ -869,40 +870,35 @@ HP@tie{}LaserJet, and possibly other printers. See @file{README} for details.")
(base32 "06pa47rl1gy19bg3fsp4a4y9vdy4ya2maajm14n791ivhf2hcwyh"))))
(build-system gnu-build-system)
(arguments
- `(#:modules
- ((srfi srfi-26)
- ,@%gnu-build-system-modules)
- #:configure-flags
- `("--disable-static"
- ,(string-append "--prefix="
- (assoc-ref %outputs "out"))
- ,(string-append "--with-cupsfilterdir="
- (assoc-ref %outputs "out") "/lib/cups/filter")
- ,(string-append "--with-cupsppddir="
- (assoc-ref %outputs "out") "/share/cups/model"))
- #:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'patch-autotools-version-requirement
- (lambda _
- (substitute* "aclocal.m4"
- (("1\\.15")
- ,(package-version automake)))
- (substitute* "configure"
- (("^(ACLOCAL=).*" _ match)
- (string-append match "aclocal"))
- (("^(AUTOMAKE=).*" _ match)
- (string-append match "automake")))
- #t))
- (add-after 'install 'compress-PPDs
- (lambda* (#:key outputs #:allow-other-keys)
- (let ((out (assoc-ref outputs "out")))
- (with-directory-excursion out
- (for-each (cut invoke "gzip" "-9" <>)
- (find-files "share/cups" "\\.ppd$")))))))))
+ (list #:modules
+ `((srfi srfi-26)
+ ,@%gnu-build-system-modules)
+ #:configure-flags
+ #~(list "--disable-static"
+ (string-append "--prefix=" #$output)
+ (string-append "--with-cupsfilterdir=" #$output "/lib/cups/filter")
+ (string-append "--with-cupsppddir=" #$output "/share/cups/model"))
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'unpack 'patch-autotools-version-requirement
+ (lambda _
+ (substitute* "aclocal.m4"
+ (("1\\.15")
+ #$(package-version automake)))
+ (substitute* "configure"
+ (("^(ACLOCAL=).*" _ match)
+ (string-append match "aclocal"))
+ (("^(AUTOMAKE=).*" _ match)
+ (string-append match "automake")))))
+ (add-after 'install 'compress-PPDs
+ (lambda _
+ (with-directory-excursion #$output
+ (for-each (cut invoke "gzip" "-9" <>)
+ (find-files "share/cups" "\\.ppd$"))))))))
(native-inputs
(list autoconf automake))
(inputs
- `(("cups" ,cups-minimal)))
+ (list cups-minimal))
(synopsis "ESC/P-R printer driver")
(description
"This package provides a filter for @acronym{CUPS, the Common UNIX Printing