me/guix
Archived
1
0
Fork 0
Code Activity

gnu: Add sbcl-cl-cffi-gtk-pango.

Browse source 
* gnu/packages/lisp.scm (sbcl-cl-cffi-gtk-pango): New variable.
This commit is contained in:
Pierre Neidhardt 2018-10-19 16:53:51 +02:00
parent 7176fe7c32
commit 9ecc457b52
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 21 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
gnu/packages/lisp.scm
View file

@ -3357,3 +3357,24 @@ is a library for creating graphical user interfaces.")
(("libcairo" all) (("libcairo" all)
(string-append (string-append
(assoc-ref inputs "cairo") "/lib/" all)))))))))) (assoc-ref inputs "cairo") "/lib/" all))))))))))
(define-public sbcl-cl-cffi-gtk-pango
(package
(inherit sbcl-cl-cffi-gtk-boot0)
(name "sbcl-cl-cffi-gtk-pango")
(inputs
`(("pango" ,pango)
("cl-cffi-gtk-glib" ,sbcl-cl-cffi-gtk-glib)
("cl-cffi-gtk-gobject" ,sbcl-cl-cffi-gtk-gobject)
("cl-cffi-gtk-cairo" ,sbcl-cl-cffi-gtk-cairo)
,@(package-inputs sbcl-cl-cffi-gtk-boot0)))
(arguments
`(#:asd-file "pango/cl-cffi-gtk-pango.asd"
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "pango/pango.init.lisp"
(("libpango" all)
(string-append
(assoc-ref inputs "pango") "/lib/" all))))))))))