me
/
guix
Archived
1
0
Fork 0
Code

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

* gnu/packages/ots.scm (ots)[arguments]: Use 'modify-phases' syntax.
master
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

9
gnu/packages/ots.scm
View File

@ -53,8 +53,9 @@
;; 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
(add-after 'configure 'set-shared-lib-extension
(lambda _ (lambda _
;; For some reason, the 'libtool' script (from Libtool ;; For some reason, the 'libtool' script (from Libtool
;; 1.5.2, Debian variant) sets 'shrext_cmds' instead of ;; 1.5.2, Debian variant) sets 'shrext_cmds' instead of
@ -62,8 +63,8 @@
;; This leads to the creation of 'libots-1' instead of ;; This leads to the creation of 'libots-1' instead of
;; 'libots-1.so'. Fix that. ;; 'libots-1.so'. Fix that.
(substitute* "libtool" (substitute* "libtool"
(("shrext_cmds") "shrext"))) (("shrext_cmds") "shrext"))
%standard-phases))) #t)))))
(inputs (inputs
`(("glib" ,glib) `(("glib" ,glib)
("popt" ,popt) ("popt" ,popt)