diff options
| author | Efraim Flashner | 2019-06-27 11:53:31 -0500 |
|---|---|---|
| committer | Efraim Flashner | 2019-06-27 11:53:31 -0500 |
| commit | 7d7f7dba9b57ff029f19b71448659ba2fd25800a (patch) | |
| tree | 68204c16eadd8e73693989797a0c2f6b9ba7d0c2 | |
| parent | 5bb2c01f50dd376cfa8f4c685025008a37f79188 (diff) | |
| download | guix-bioinformatics-7d7f7dba9b57ff029f19b71448659ba2fd25800a.tar.gz | |
gn: prepare to package with python2.4.
| -rw-r--r-- | gn/packages/python24.scm | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/gn/packages/python24.scm b/gn/packages/python24.scm index 6a5612e..4508409 100644 --- a/gn/packages/python24.scm +++ b/gn/packages/python24.scm @@ -3,7 +3,11 @@ #:use-module (guix utils) #:use-module (guix packages) #:use-module (guix download) + #:use-module (guix git-download) + #:use-module (guix build-system python) #:use-module (gnu packages python) + #:use-module (gnu packages python-xyz) + #:use-module (gnu packages tcl) #:use-module (srfi srfi-1)) ;; TODO: Check against 'guix lint -c cve python2.4' list: @@ -65,3 +69,19 @@ read read ssl ssl tcl tcl tk tk ,(version-major+minor (package-version tcl)) ,(v (variable "PYTHONPATH") (files '("lib/python2.4/site-packages"))))) (properties '((cpe-name . "python"))))) + +(define (default-python2.4) + "Return the default Python-2.4 package." + ;; Lazily resolve the binding. + (let ((python (resolve-interface '(gn packages python24)))) + (module-ref python 'python-2.4))) + +(define package-with-python24 + ((@@ (guix build-system python) package-with-explicit-python) (delay (default-python2.4)) + "python-" "python24-" + #:variant-property 'python24-variant)) + +(define (strip-python24-variant p) + (package + (inherit p) + (properties (alist-delete 'python24-variant (package-properties p))))) |