On Sat, Feb 07, 2009 at 07:17:20AM +1000, Qu Yang wrote:
> Hi all,
>
> This is the error I have after (require 'cells-gtk)
>
> or:
> ; READ failure in COMPILE-FILE:
> ; SB-INT:SIMPLE-READER-PACKAGE-ERROR at 22404 (line 576, column 69) on
> #<SB-SYS:FD-STREAM for "file
> /home/yang/.sbcl/site/cells-gtk3/cells-gtk/cairo-drawing-area.lisp"
> {BD5DAB1}>:
> ; Symbol "FONT-SLANT-ITALIC" not found in the CL-CAIRO2 package.
> ; compilation aborted after 0:00:03
>
> I have installed cl-cairo2.
>
> Can anyone please help to solve this problem?
>
> Regards,
> Yang
> _______________________________________________
> cells-gtk-devel site list
> cells-gtk-devel@common-lisp.net
> http://common-lisp.net/mailman/listinfo/cells-gtk-devel
If you have not got round to cloning the git repository, here is what
you can change in the mean time:
jo...@perle:~/prg/cells-gtk/cells-gtk$ diff -u cairo-drawing-area.lisp.orig
cairo-drawing-area.lisp
--- cairo-drawing-area.lisp.orig 2008-06-03 18:33:44.000000000 +0200
+++ cairo-drawing-area.lisp 2009-01-17 21:49:41.000000000 +0100
@@ -573,8 +573,8 @@
(defdraw text-label (p text font-face font-size italic bold alignment
vertical-alignment rgb alpha)
(cl-cairo2:set-font-size font-size context)
(cl-cairo2:select-font-face font-face
- (if italic 'cl-cairo2:font-slant-italic
'cl-cairo2:font-slant-normal)
- (if bold 'cl-cairo2:font-weight-bold
'cl-cairo2:font-weight-normal)
+ (if italic :italic :normal)
+ (if bold :bold :normal)
context)
(multiple-value-bind (x-bearing y-bearing text-width text-height)
(cl-cairo2:text-extents text context)
jo...@perle:~/prg/cells-gtk/cells-gtk$
--
Hilsen
Johan Ur Riise
_______________________________________________
cells-gtk-devel site list
cells-gtk-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/cells-gtk-devel
