futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: skribilo: Make sure Guile-Reader is in the search path.

Browse Source 
Reported by Luis Souto Graña <luissoutobueu@gmail.com>.

* gnu/packages/skribilo.scm (skribilo)[arguments]: Add #:phases.
This commit is contained in:
Ludovic Courtès 2014-09-18 11:22:01 +02:00
parent c8bf8b2f88
commit 2f7a10db6d
1 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gnu/packages/skribilo.scm
View File

@ -43,6 +43,22 @@
'(#:configure-flags (list (string-append "--with-guilemoduledir=" '(#:configure-flags (list (string-append "--with-guilemoduledir="
(assoc-ref %outputs "out") (assoc-ref %outputs "out")
"/share/guile/site/2.0")) "/share/guile/site/2.0"))
#:phases (alist-cons-before
'configure 'pre-configure
(lambda* (#:key inputs #:allow-other-keys)
;; Make sure the 'skribilo' command gets to see
;; Guile-Reader, even if Guile-Reader is not in the search
;; path.
(let ((reader (assoc-ref inputs "guile-reader")))
(substitute* "src/skribilo.in"
(("^exec (.*) -c" _ things)
(string-append "exec " things
" -L " reader "/share/guile/site/2.0"
" -C " reader "/share/guile/site/2.0"
" -c")))))
%standard-phases)
#:parallel-build? #f)) #:parallel-build? #f))
;; TODO: Add Ploticus. ;; TODO: Add Ploticus.
(inputs `(("guile" ,guile-2.0) (inputs `(("guile" ,guile-2.0)