[closure-cvs] CVS update: closure/src/html/html-style.lisp

[Eric Marsden]

Update of /project/closure/cvsroot/closure/src/html
In directory common-lisp.net:/tmp/cvs-serv27902/html

Modified Files:
	html-style.lisp 
Log Message:
Move a number of global variables from the CL-USER to the GUI package.

Date: Sun Jul 10 12:57:21 2005
Author: emarsden

Index: closure/src/html/html-style.lisp
diff -u closure/src/html/html-style.lisp:1.5 closure/src/html/html-style.lisp:1.6
--- closure/src/html/html-style.lisp:1.5	Mon Jun 13 12:14:22 2005
+++ closure/src/html/html-style.lisp	Sun Jul 10 12:57:21 2005
@@ -484,7 +484,7 @@
      elm)
   (declare (ignorable language user-agent))
   (values-list
-   (cond ((and (not closure:*user-wants-images-p*)
+   (cond ((and (not gui:*user-wants-images-p*)
                (member (element-gi elm) '(:IMG)))
           nil)
          ((member (element-gi elm) '(:IMG))