me
/
guix
Archived
1
0
Fork 0

gnu: psutils: Update to 2.09.

* gnu/packages/ghostscript.scm (psutils): Update to 2.09.
[source](uri): Change to currently maintained fork.
[home-page]: Ditto.
[native-inputs]: Add LIBPAPER.
[arguments]: Remove #:phases.  Add #:tests? and #:configure-flags.
[license]: Add GPL3+.
master
Marius Bakke 2022-07-06 22:48:05 +02:00
parent 12e77c03bc
commit 55e3b5fa2a
No known key found for this signature in database
GPG Key ID: A2A06DF2A33A54FA
1 changed files with 33 additions and 35 deletions

View File

@ -42,6 +42,7 @@
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix gexp)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system trivial) #:use-module (guix build-system trivial)
@ -108,34 +109,27 @@ paper size.")
(define-public psutils (define-public psutils
(package (package
(name "psutils") (name "psutils")
(version "17") (version "2.09")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri "ftp://ftp.knackered.org/pub/psutils/psutils.tar.gz") (uri (string-append "https://github.com/rrthomas/psutils/releases"
(sha256 (base32 "/download/v" version "/psutils-"
"1r4ab1fvgganm02kmm70b2r1azwzbav2am41gbigpa2bb1wynlrq")))) version ".tar.gz"))
(sha256
(base32
"1nmp0hb7c4a315vv1mqw2cbckvca8bzh1cv3gdvwwy24w9qba6p3"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (list perl)) (inputs (list perl))
(native-inputs
(list libpaper))
(arguments (arguments
`(#:tests? #f ; none provided (list #:tests? #f ;FIXME: requires files not present in tarball
#:phases #:configure-flags
(modify-phases %standard-phases ;; Help the build system locate Perl when cross-compiling.
(replace 'configure (if (%current-target-system)
(lambda* (#:key inputs outputs #:allow-other-keys #:rest args) #~(list (string-append "ac_cv_path_PERL="
(let ((perl (assoc-ref inputs "perl")) (search-input-file %build-inputs "bin/perl")))
(out (assoc-ref outputs "out"))) #~'())))
(copy-file "Makefile.unix" "Makefile")
(substitute* "Makefile"
(("/usr/local/bin/perl") (string-append perl "/bin/perl")))
(substitute* "Makefile"
(("/usr/local") out))
;; for the install phase
(substitute* "Makefile"
(("-mkdir") "mkdir -p"))
;; drop installation of non-free files
(substitute* "Makefile"
((" install.include") "")))
#t)))))
(synopsis "Collection of utilities for manipulating PostScript documents") (synopsis "Collection of utilities for manipulating PostScript documents")
(description (description
"PSUtils is a collection of utilities for manipulating PostScript "PSUtils is a collection of utilities for manipulating PostScript
@ -143,9 +137,13 @@ documents. Programs included are psnup, for placing out several logical pages
on a single sheet of paper, psselect, for selecting pages from a document, on a single sheet of paper, psselect, for selecting pages from a document,
pstops, for general imposition, psbook, for signature generation for booklet pstops, for general imposition, psbook, for signature generation for booklet
printing, and psresize, for adjusting page sizes.") printing, and psresize, for adjusting page sizes.")
(license (license:non-copyleft "file://LICENSE" (home-page "https://github.com/rrthomas/psutils")
"See LICENSE in the distribution.")) (license (list license:gpl3+
(home-page "http://knackered.org/angus/psutils/"))) ;; This file carries the "historical" psutils license (v1),
;; which is "effectively BSD 3-clause" (a quote from the file).
(license:non-copyleft
"file://extractres.in.in"
"See extractres.in.in in the distribution.")))))
(define-public ghostscript (define-public ghostscript
(package (package