gnu: Add python-file.

* gnu/packages/python.scm (python-file, python2-file): New variables.
This commit is contained in:
Ludovic Courtès 2015-10-26 09:58:55 +01:00
parent e3e1ecf67c
commit 5e1c936712
1 changed files with 27 additions and 0 deletions

View File

@ -39,6 +39,7 @@
#:use-module (gnu packages backup) #:use-module (gnu packages backup)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages databases) #:use-module (gnu packages databases)
#:use-module (gnu packages file)
#:use-module (gnu packages fontutils) #:use-module (gnu packages fontutils)
#:use-module (gnu packages gdbm) #:use-module (gnu packages gdbm)
#:use-module (gnu packages gcc) #:use-module (gnu packages gcc)
@ -5750,3 +5751,29 @@ Python's @code{ctypes} foreign function interface (FFI).")
(define-public python2-libarchive-c (define-public python2-libarchive-c
(package-with-python2 python-libarchive-c)) (package-with-python2 python-libarchive-c))
(define-public python-file
(package
(inherit file)
(name "python-file")
(build-system python-build-system)
(arguments
'(#:tests? #f ;no tests
#:phases (modify-phases %standard-phases
(add-before 'build 'change-directory
(lambda _
(chdir "python")
#t))
(add-before 'build 'set-library-file-name
(lambda* (#:key inputs #:allow-other-keys)
(let ((file (assoc-ref inputs "file")))
(substitute* "magic.py"
(("find_library\\('magic'\\)")
(string-append "'" file "/lib/libmagic.so'")))
#t))))))
(inputs `(("file" ,file)))
(self-native-input? #f)
(synopsis "Python bindings to the libmagic file type guesser")))
(define-public python2-file
(package-with-python2 python-file))