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

* 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

View file

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