From f318a29598a35efc8f67571dcb5cf274279bc6ff Mon Sep 17 00:00:00 2001 From: pjotrp Date: Sat, 13 Feb 2016 15:01:13 +0100 Subject: htmlgen --- gn/packages/python.scm | 77 ++++++++++++++++++++++++++++++++++++++++++++++++-- 1 file changed, 74 insertions(+), 3 deletions(-) diff --git a/gn/packages/python.scm b/gn/packages/python.scm index c8a4a46..032f4f1 100644 --- a/gn/packages/python.scm +++ b/gn/packages/python.scm @@ -2,6 +2,7 @@ #:use-module ((guix licenses) #:prefix license:) #:use-module (gnu packages) #:use-module (gnu packages attr) + #:use-module (gnu packages base) #:use-module (gnu packages compression) #:use-module (gnu packages databases) #:use-module (gnu packages fontutils) @@ -29,7 +30,6 @@ #:use-module (gnu packages texinfo) #:use-module (gnu packages tls) #:use-module (gnu packages web) - #:use-module (gnu packages base) #:use-module (gnu packages xml) #:use-module (gnu packages xorg) #:use-module (gnu packages zip) @@ -273,6 +273,63 @@ powerful language for representing information.") (define-public python2-mysqlclient (package-with-python2 python-mysqlclient)) +(define-public python2-htmlgen-old +(package + (name "python2-htmlgen-old") + (version "2.2.2") + (source (origin + (method url-fetch) + (uri (string-append + "http://ftp.nl.debian.org/debian/pool/main/h/htmlgen/htmlgen_" +version ".orig.tar.gz")) + (sha256 + (base32 + "186kb434q6z84g31ysvzi4kcfcvl3pmm57k4jlng4ccgls94x6wb")) + (patches (list + (search-patch "python2-htmlgen-Applied-Deb-patch.patch") + (search-patch "python2-htmlgen-Fix-test-for-random.patch") + )))) + (build-system gnu-build-system) + (outputs + '("out")) + (native-inputs `(("tar" ,tar) + ("gzip" ,gzip))) + (inputs + `(("make" ,gnu-make))) + (propagated-inputs + `(("python2" ,python-2))) + (arguments + `(#:modules ((guix build utils)) + #:builder + (let* ((source (assoc-ref %build-inputs "source")) + (tar (assoc-ref %build-inputs "tar")) + (gzip (assoc-ref %build-inputs "gzip")) + (output (assoc-ref %outputs "out")) + (srcdir (string-append output "/src")) + (lib (string-append (assoc-ref %outputs "out") "/lib/htmlgen")) + (python (string-append (assoc-ref %build-inputs "python2") "/bin/"))) + (begin + (use-modules (guix build utils)) + (setenv "PATH" (string-append gzip "/bin")) ;; for tar + ;; (setenv "PATH" (string-append python "/bin")) + (system* (string-append tar "/bin/tar") "xzf" + source) + (chdir ,(string-append name "-" version)) + (mkdir-p srcdir) + (lambda _ + (system* "python" "-m" "compileall" ".")) + (lambda _ + (system* "make" "test")) + (mkdir-p lib) + ; (copy-file "." lib) + (copy-file "HTMLgen.pyc" lib) + )))) + (home-page + "https://packages.debian.org/unstable/python/python-htmlgen") + (synopsis "Python2 HTMLgen (somewhat defunkt project)") + (description #f) + (license #f))) + (define-public python2-htmlgen (package (name "python2-htmlgen") @@ -285,9 +342,23 @@ version ".orig.tar.gz")) (sha256 (base32 "186kb434q6z84g31ysvzi4kcfcvl3pmm57k4jlng4ccgls94x6wb")) - (patches (list (search-patch "htmlgen_2.2.2-12.3.patch") + (patches (list + (search-patch "python2-htmlgen-Applied-Deb-patch.patch") + (search-patch "python2-htmlgen-Fix-test-for-random.patch") )))) - (build-system python-build-system) + (build-system gnu-build-system) + (inputs + `(("make" ,gnu-make))) + (propagated-inputs + `(("python2" ,python-2))) + (arguments + `(#:phases (modify-phases %standard-phases + (delete 'configure) + (replace 'build + (lambda _ + (zero? (apply system* "make" "test"))))) + + #:tests? #f)) (home-page "https://packages.debian.org/unstable/python/python-htmlgen") (synopsis "Python2 HTMLgen (somewhat defunkt project)") -- cgit v1.2.3