TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: gunicorn: Remove unneeded runtime dependencies.

Browse source 
* gnu/packages/python-web.scm (gunicorn)[arguments]: Override 'wrap' phase.
This commit is contained in:
Marius Bakke 2021-05-06 01:01:58 +02:00
parent d51daf25c4
commit 0f056f2c33
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 16 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/python-web.scm
View file

@ -4730,8 +4730,22 @@ (define-public gunicorn
(copy-recursively "examples" examples)
(for-each (lambda (file)
(copy-file file (string-append doc "/" file)))
'("README.rst" "NOTICE" "LICENSE" "THANKS")))
#t)))))
'("README.rst" "NOTICE" "LICENSE" "THANKS")))))
;; XXX: The wrap phase includes native inputs on PYTHONPATH, (see
;; <https://bugs.gnu.org/25235>), leading to an inflated closure
;; size. Override it to only add the essential entries.
(replace 'wrap
(lambda* (#:key native-inputs inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(python (assoc-ref (or native-inputs inputs) "python"))
(sitedir (string-append "/lib/python"
(python-version python)
"/site-packages")))
(wrap-program (string-append out "/bin/gunicorn")
`("PYTHONPATH" ":" prefix
,(map (lambda (output)
(string-append output sitedir))
(list python out))))))))))
(native-inputs
`(("binutils" ,binutils) ;; for ctypes.util.find_library()
("python-aiohttp" ,python-aiohttp)