nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: Fix load-extension path in packaging of guile-ncurses. 

* gnu/packages/guile.scm (guile-ncurses) [arguments]: Install shared object before
attempting to build the package.  Patch load-extension path before building instead
of after.
This commit is contained in:
John Darrington 2016-12-19 14:03:40 +01:00
parent 1feeb2e035
commit 8c4e99cca3
No known key found for this signature in database
GPG Key ID: 8A67719C2DE827B3
1 changed files with 13 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
gnu/packages/guile.scm
View File

@ -431,16 +431,20 @@ many readers as needed).")
"--with-gnu-filesystem-hierarchy") "--with-gnu-filesystem-hierarchy")
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'install 'post-install (add-before 'build 'fix-libguile-ncurses-file-name
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (and (zero? (system* "make" "install"
(dir (string-append out "/share/guile/site/")) "-C" "src/ncurses"
(files (find-files dir ".scm"))) "-j" (number->string
(substitute* files (parallel-job-count))))
(("\"libguile-ncurses\"") (let* ((out (assoc-ref outputs "out"))
(format #f "\"~a/lib/guile/2.0/libguile-ncurses\"" (dir "src/ncurses")
out))) (files (find-files dir ".scm")))
#t)))))) (substitute* files
(("\"libguile-ncurses\"")
(format #f "\"~a/lib/guile/2.0/libguile-ncurses\""
out)))
#t)))))))
(home-page "https://www.gnu.org/software/guile-ncurses/") (home-page "https://www.gnu.org/software/guile-ncurses/")
(synopsis "Guile bindings to ncurses") (synopsis "Guile bindings to ncurses")
(description (description