The attached patch fixes the problem described here:
http://www.sbcl.org/manual/Defining-Constants.html#Defining%20Constants
It depends on a new component: "cl-plus" which is often used for resolving this specific problem in Debian and Gentoo. cl-plus can be found here:
http://packages.debian.org/unstable/devel/cl-plus
Index: layout.lisp =================================================================== RCS file: /project/log4cl/cvsroot/log4cl/layout.lisp,v retrieving revision 1.3 diff -u -r1.3 layout.lisp --- layout.lisp 1 Mar 2004 18:35:38 -0000 1.3 +++ layout.lisp 12 Jul 2005 15:32:11 -0000 @@ -132,7 +132,7 @@ (line-number :initarg :line :initform nil)))
-(defconstant +colors+ +(cl+:defconst +colors+ '(("debug" . "#339933") ("info" . "#000000") ("warning" . "#993300") Index: log4cl.asd =================================================================== RCS file: /project/log4cl/cvsroot/log4cl/log4cl.asd,v retrieving revision 1.5 diff -u -r1.5 log4cl.asd --- log4cl.asd 24 Apr 2004 09:26:55 -0000 1.5 +++ log4cl.asd 12 Jul 2005 15:32:11 -0000 @@ -43,7 +43,8 @@ (:file "appender" :depends-on ("package" "tools")) (:file "layout" :depends-on ("package" "tools")) (:file "package-logger" :depends-on ("logger")) - (:file "tools" :depends-on ("package")))) + (:file "tools" :depends-on ("package"))) + :depends-on (#:cl-plus))
(defsystem :log4cl.syslog :components ((:file "appender-syslog" :depends-on ("cl-syslog")) Index: debian/control =================================================================== RCS file: /project/log4cl/cvsroot/log4cl/debian/control,v retrieving revision 1.1.1.1 diff -u -r1.1.1.1 control --- debian/control 20 Feb 2004 09:00:08 -0000 1.1.1.1 +++ debian/control 12 Jul 2005 15:32:11 -0000 @@ -7,7 +7,7 @@
Package: log4cl Architecture: i386 -Depends: common-lisp-controller (>= 3.37) +Depends: common-lisp-controller (>= 3.37), cl-plus (>= 1.0) Description: Common Lisp utility to logging log4cl is a Common Lisp utility to logging. log4cl can use Syslog database, html file, a file or console to print message
thanks a lot ! i have a more recent log4cl version at home, and i define on this version +colors+ like this :
(unless (boundp +colors+) (defconstant +colors+ '(("debug" . "#339933") ("info" . "#000000") ("warning" . "#993300") ("error" . "#993300") ("fatal" . "#993300"))))
Matthew Kennedy mkennedy@gentoo.org writes:
The attached patch fixes the problem described here:
http://www.sbcl.org/manual/Defining-Constants.html#Defining%20ConstantsIt depends on a new component: "cl-plus" which is often used for resolving this specific problem in Debian and Gentoo. cl-plus can be found here:
http://packages.debian.org/unstable/devel/cl-plusIndex: layout.lisp
RCS file: /project/log4cl/cvsroot/log4cl/layout.lisp,v retrieving revision 1.3 diff -u -r1.3 layout.lisp --- layout.lisp 1 Mar 2004 18:35:38 -0000 1.3 +++ layout.lisp 12 Jul 2005 15:32:11 -0000 @@ -132,7 +132,7 @@ (line-number :initarg :line :initform nil)))
-(defconstant +colors+ +(cl+:defconst +colors+ '(("debug" . "#339933") ("info" . "#000000") ("warning" . "#993300") Index: log4cl.asd =================================================================== RCS file: /project/log4cl/cvsroot/log4cl/log4cl.asd,v retrieving revision 1.5 diff -u -r1.5 log4cl.asd --- log4cl.asd 24 Apr 2004 09:26:55 -0000 1.5 +++ log4cl.asd 12 Jul 2005 15:32:11 -0000 @@ -43,7 +43,8 @@ (:file "appender" :depends-on ("package" "tools")) (:file "layout" :depends-on ("package" "tools")) (:file "package-logger" :depends-on ("logger"))
(:file "tools" :depends-on ("package"))))
(:file "tools" :depends-on ("package")))- :depends-on (#:cl-plus))
(defsystem :log4cl.syslog :components ((:file "appender-syslog" :depends-on ("cl-syslog")) Index: debian/control =================================================================== RCS file: /project/log4cl/cvsroot/log4cl/debian/control,v retrieving revision 1.1.1.1 diff -u -r1.1.1.1 control --- debian/control 20 Feb 2004 09:00:08 -0000 1.1.1.1 +++ debian/control 12 Jul 2005 15:32:11 -0000 @@ -7,7 +7,7 @@
Package: log4cl Architecture: i386 -Depends: common-lisp-controller (>= 3.37) +Depends: common-lisp-controller (>= 3.37), cl-plus (>= 1.0) Description: Common Lisp utility to logging log4cl is a Common Lisp utility to logging. log4cl can use Syslog database, html file, a file or console to print message
-
Matthew Kennedy -
Nicolas Lamirault