ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: ots: Use 'modify-phases' syntax.

Browse source 
* gnu/packages/ots.scm (ots)[arguments]: Use 'modify-phases' syntax.
This commit is contained in:
Efraim Flashner 2017-03-21 20:57:08 +02:00
parent b1d3e0a93b
commit 8ea71f2005
No known key found for this signature in database
GPG key ID: F4C1D3917EACEE93
1 changed files with 12 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
gnu/packages/ots.scm
View file

@ -53,17 +53,18 @@ (define-public ots
;; before libots-1.la has been built. ;; before libots-1.la has been built.
'(#:parallel-build? #f '(#:parallel-build? #f
#:phases (alist-cons-after #:phases
'configure 'set-shared-lib-extension (modify-phases %standard-phases
(lambda _ (add-after 'configure 'set-shared-lib-extension
;; For some reason, the 'libtool' script (from Libtool (lambda _
;; 1.5.2, Debian variant) sets 'shrext_cmds' instead of ;; For some reason, the 'libtool' script (from Libtool
;; 'shrext' for the shared library file name extension. ;; 1.5.2, Debian variant) sets 'shrext_cmds' instead of
;; This leads to the creation of 'libots-1' instead of ;; 'shrext' for the shared library file name extension.
;; 'libots-1.so'. Fix that. ;; This leads to the creation of 'libots-1' instead of
(substitute* "libtool" ;; 'libots-1.so'. Fix that.
(("shrext_cmds") "shrext"))) (substitute* "libtool"
%standard-phases))) (("shrext_cmds") "shrext"))
#t)))))
(inputs (inputs
`(("glib" ,glib) `(("glib" ,glib)
("popt" ,popt) ("popt" ,popt)