From: Brice Waegeneire <brice@waegenei.re>
To: 45725@debbugs.gnu.org
Cc: Brice Waegeneire <brice@waegenei.re>
Subject: [bug#45725] [PATCH v4] gnu: Add gutenprint.
Date: Sat, 12 Feb 2022 10:34:10 +0100 [thread overview]
Message-ID: <20220212093410.9161-1-brice@waegenei.re> (raw)
In-Reply-To: <20210108113822.24978-1-dftxbs3e@free.fr>
From: John Doe <dftxbs3e@free.fr>
* gnu/packages/cups.scm (gutenprint): New variable.
Co-authored-by: Brice Waegeneire <brice@waegenei.re>
---
I reworked this patch from John Doe by:
- updating it to 5.3.4
- adding the copyright header
- using the new input style
- fixing the synopsis and description as suggested by Ludo’
It works fine in cups-service-type, as I'm using a driver from gutenprint to
print to my local printer.
gnu/packages/cups.scm | 55 +++++++++++++++++++++++++++++++++++++++++++
1 file changed, 55 insertions(+)
diff --git a/gnu/packages/cups.scm b/gnu/packages/cups.scm
index da113ac168..0831fad764 100644
--- a/gnu/packages/cups.scm
+++ b/gnu/packages/cups.scm
@@ -8,6 +8,8 @@
;;; Copyright © 2017–2021 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
+;;; Copyright © 2021 John Doe <dftxbs3e@free.fr>
+;;; Copyright © 2022 Brice Waegeneire <brice@waegenei.re>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -47,6 +49,7 @@ (define-module (gnu packages cups)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt)
#:use-module (gnu packages scanner)
+ #:use-module (gnu packages time)
#:use-module (gnu packages tls)
#:use-module (guix build-system cmake)
#:use-module (guix build-system gnu)
@@ -984,6 +987,58 @@ (define-public splix
(home-page "http://splix.ap2c.org/")
(license license:gpl2))))
+(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+)))
+
(define-public python-pycups
(package
(name "python-pycups")
base-commit: 068d99978a0c9c6fb66f95455060c8d08ba55ac5
--
2.34.0
next prev parent reply other threads:[~2022-02-12 9:36 UTC|newest]
Thread overview: 13+ messages / expand[flat|nested] mbox.gz Atom feed top
2021-01-08 11:38 [bug#45725] [PATCH] gnu: Add gutenprint John Doe
2021-01-08 11:51 ` [bug#45725] [PATCH v2] " John Doe
2021-01-08 12:50 ` Jonathan Brielmaier
2021-01-08 12:09 ` dftxbs3e
2021-01-09 11:12 ` [bug#45725] [PATCH v3] " John Doe
2021-01-19 14:56 ` [bug#45725] [PATCH] " Ludovic Courtès
2021-01-20 4:04 ` dftxbs3e
2021-08-13 20:03 ` [bug#45725] Getting Gutenprint in Guix Faré
2021-08-13 21:38 ` Faré
2021-08-14 3:34 ` Faré
2022-02-12 9:34 ` Brice Waegeneire [this message]
2022-04-30 11:21 ` [bug#45725] [PATCH] gnu: Add gutenprint Milan Svoboda
2022-04-30 15:09 ` Milan Svoboda
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20220212093410.9161-1-brice@waegenei.re \
--to=brice@waegenei.re \
--cc=45725@debbugs.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/guix.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.