You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 

75 lines
2.9 KiB

(use-modules (guix packages)
(guix download)
(guix utils)
(gnu services mail)
(gnu services virtualization)
(guix profiles)
(gnu packages python-xyz)
(gnu packages qt)
(gnu packages cups)
(gnu packages perl)
(gnu packages scanner)
(gnu packages time)
(gnu packages tls)
(guix build-system cmake)
(guix build-system gnu)
(gnu packages admin)
(gnu packages commencement)
(gnu packages mail)
(gnu packages terminals)
((guix licenses) #:prefix license:)
(gnu services cups))
(define-public gutenprint
(package
(name "gutenprint")
(version "5.3.4")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://sourceforge/gimp-print/" name "-"
(version-major+minor version) "/" version "/"
name "-" version ".tar.xz"))
(sha256
(base32 "0fq2y9sx37d342fihp1ys9kf4sr2j5nc1kl33j9sirmqs80sfi6v"))))
(build-system gnu-build-system)
(arguments
`(#:test-target "check-parallel"
#:configure-flags (list "--enable-cups-level3-ppds"
"--enable-globalized-cups-ppds"
"--enable-cups-ppds"
"--enable-cups-1_2-enhancements")
#:phases
(modify-phases %standard-phases
(add-before 'configure 'fix-paths
(lambda* (#:key outputs native-inputs #:allow-other-keys)
(substitute* "Makefile.in"
(("/usr/bin/time") "time"))
(let ((out (assoc-ref outputs "out")))
(substitute* (find-files "." "^(Makefile|Makefile\\.in|configure)$")
(("^(\\s*)cups_conf_serverbin(\\s*)=(.+)$")
(string-append "cups_conf_serverbin=" out "/lib/cups\n"))
(("^(\\s*)cups_conf_serverroot(\\s*)=(.+)$")
(string-append "cups_conf_serverroot=" out "/etc/cups\n"))
(("^(\\s*)cups_conf_datadir(\\s*)=(.+)$")
(string-append "cups_conf_datadir=" out "/share/cups\n")))
(substitute* "src/cups/Makefile.in"
(("^(\\s*)bindir(\\s*)=(.+)$")
(string-append "bindir = " out "/bin\n"))
(("^(\\s*)sbindir(\\s*)=(.+)$")
(string-append "sbindir = " out "/sbin\n")))
#t))))))
(native-inputs
(list perl
time))
(inputs
(list cups-minimal))
(synopsis "Printer drivers for CUPS")
(description "This package provides printer drivers for CUPS.
This project also maintains an enhanced Print plug-in for GIMP 2.x from
the same code base. This driver supports widespread inkjet printers by major vendors,
including Canon, Epson, Fujitsu, SONY, @dots{}")
(home-page "http://gimp-print.sourceforge.net/")
(license license:gpl2+)))
gutenprint