[cl-l10n-cvs] CVS cl-l10n

[alendvai]

Update of /project/cl-l10n/cvsroot/cl-l10n
In directory clnet:/tmp/cvs-serv20708

Modified Files:
	load-locale.lisp 
Log Message:
Wrap load-default-locale in eval-when :load-toplevel :execute


--- /project/cl-l10n/cvsroot/cl-l10n/load-locale.lisp	2006/04/27 18:30:30	1.15
+++ /project/cl-l10n/cvsroot/cl-l10n/load-locale.lisp	2006/06/06 14:58:46	1.16
@@ -371,6 +371,7 @@
       (locale (getenv "LANG") :errorp nil)
       (locale "POSIX" :errorp nil)))
 
-(load-default-locale)
+(eval-when (:load-toplevel :execute)
+  (load-default-locale))
 
 ;; EOF