Update of /project/closure/cvsroot/closure/src/renderer In directory clnet:/tmp/cvs-serv12710/src/renderer

Modified Files: document.lisp Log Message: Cleanups.

--- /project/closure/cvsroot/closure/src/renderer/document.lisp 2006/12/31 15:42:41 1.6 +++ /project/closure/cvsroot/closure/src/renderer/document.lisp 2007/01/04 23:46:26 1.7 @@ -157,10 +157,6 @@ ;; STYLE and combine, as if they occured via @import. (let ((sheets nil) (pt (document-pt doc))) - - (setq cl-user::pt pt) - - ;; (dolist (link (document-links doc)) (when (and (style-sheet-link-p link) (style-link-does-apply-p link selected-style)