unofficial mirror of bug-guix@gnu.org 
 help / color / mirror / code / Atom feed
* [PATCH] gnu: Add psutils.
@ 2013-01-20 22:33 Andreas Enge
  2013-01-21 20:15 ` Ludovic Courtès
  0 siblings, 1 reply; 6+ messages in thread
From: Andreas Enge @ 2013-01-20 22:33 UTC (permalink / raw)
  To: bug-guix


[-- Attachment #1.1: Type: text/plain, Size: 297 bytes --]

The attached patch adds psutils. Its license is homebrewed:
   http://packages.debian.org/changelogs/pool/main/p/psutils/current/copyright
Does it qualify as "bsd-like"? If not, would it make sense to add a license 
"other" to licenses.scm, which takes the same parameters as "bsd-like"?

Andreas

[-- Attachment #1.2: Type: text/html, Size: 1529 bytes --]

[-- Attachment #2: 0001-gnu-Add-psutils.patch --]
[-- Type: text/x-patch, Size: 2510 bytes --]

From 2ed9a3862d3f120986ed40863a26a88c64f5ded7 Mon Sep 17 00:00:00 2001
From: Andreas Enge <andreas@enge.fr>
Date: Sun, 20 Jan 2013 23:26:11 +0100
Subject: [PATCH] gnu: Add psutils.

* gnu/packages/ghostscript.scm (psutils): New variable.
---
 gnu/packages/ghostscript.scm |   42 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)

diff --git a/gnu/packages/ghostscript.scm b/gnu/packages/ghostscript.scm
index a375675..a2ca108 100644
--- a/gnu/packages/ghostscript.scm
+++ b/gnu/packages/ghostscript.scm
@@ -75,6 +75,48 @@ paper size.")
    (license license:gpl2)
    (home-page "http://packages.qa.debian.org/libp/libpaper.html")))
 
+(define-public psutils
+  (package
+   (name "psutils")
+   (version "17")
+   (source (origin
+            (method url-fetch)
+            (uri "ftp://ftp.knackered.org/pub/psutils/psutils.tar.gz")
+            (sha256 (base32
+                     "1r4ab1fvgganm02kmm70b2r1azwzbav2am41gbigpa2bb1wynlrq"))))
+   (build-system gnu-build-system)
+   (inputs `(("perl" ,perl)))
+   (arguments
+    `(#:tests? #f ; none provided
+      #:phases
+      (alist-replace
+       'configure
+       (lambda* (#:key inputs outputs #:allow-other-keys #:rest args)
+        (let ((perl (assoc-ref inputs "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))
+         (substitute* "Makefile"
+             (("-mkdir") "mkdir -p"))
+              ;; for the install phase
+         (substitute* "Makefile"
+             ((" install.include") ""))
+              ;; drop installation of non-free files
+         ))
+      %standard-phases)))
+   (synopsis "psutils, a collection of utilities for manipulating PostScript documents")
+   (description
+    "PSUtils is a collection of utilities for manipulating PostScript
+documents. Programs included are psnup, for placing out several logical pages
+on a single sheet of paper, psselect, for selecting pages from a document,
+pstops, for general imposition, psbook, for signature generation for booklet
+printing, and psresize, for adjusting page sizes.")
+   (license "other")
+   (home-page "http://knackered.org/angus/psutils/")))
+
 (define-public ghostscript
   (package
    (name "ghostscript")
-- 
1.7.10.4


^ permalink raw reply related	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2013-01-23 23:10 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-01-20 22:33 [PATCH] gnu: Add psutils Andreas Enge
2013-01-21 20:15 ` Ludovic Courtès
2013-01-21 20:45   ` Andreas Enge
2013-01-21 22:43     ` Ludovic Courtès
2013-01-23 20:07       ` Andreas Enge
2013-01-23 23:10         ` Ludovic Courtès

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).