glv pushed a commit to branch master
in repository guix.
commit 942a8247467adf6aabbbb5c43bd9a55c991e72c6
Author: Guillaume Le Vaillant <[email protected]>
AuthorDate: Fri Jul 17 12:02:24 2020 +0200
gnu: Add sbcl-mcclim-clx-freetype.
* gnu/packages/lisp-xyz.scm (sbcl-mcclim-clx-freetype): New variable.
---
gnu/packages/lisp-xyz.scm | 20 ++++++++++++++++++++
1 file changed, 20 insertions(+)
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 9876ffd..9ff37ac 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -13001,3 +13001,23 @@ specification}, a toolkit for writing GUIs in Common
Lisp.")
(arguments
'(#:asd-file "Extensions/fonts/mcclim-fonts.asd"
#:asd-system-name "mcclim-fonts/clx-freetype"))))
+
+(define-public sbcl-mcclim-clx-freetype
+ (package
+ (inherit sbcl-clim-lisp)
+ (name "sbcl-mcclim-clx-freetype")
+ (inputs
+ `(("mcclim-clx" ,sbcl-mcclim-clx)
+ ("mcclim-fonts-clx-freetype" ,sbcl-mcclim-fonts-clx-freetype)
+ ("swank" ,cl-slime-swank))) ; For drei-mcclim
+ (arguments
+ '(#:asd-file "Backends/CLX/mcclim-clx.asd"
+ #:asd-system-name "mcclim-clx/freetype"
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'fix-asd-system-names
+ (lambda _
+ (substitute* "Backends/CLX/mcclim-clx.asd"
+ (("mcclim-fonts/clx-freetype")
+ "mcclim-fonts-clx-freetype"))
+ #t)))))))
