From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 23 Oct 2007 21:24:36 +0000 (+0000)
Subject: Require CL.
X-Git-Tag: emacs-pretest-22.1.90~533
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=088d6743d83c35a054846147aaac8c42df5dc40f;p=emacs.git

Require CL.
(comment-continue): Declare.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4de00ebb2b1..177aeb103c5 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2007-10-23  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* textmodes/css-mode.el: Require CL.
+	(comment-continue): Declare.
+
 	* subr.el (make-variable-frame-localizable): Remove.
 	(make-variable-frame-local): Mark obsolete.
 
diff --git a/lisp/textmodes/css-mode.el b/lisp/textmodes/css-mode.el
index d21559411e7..106148979cf 100644
--- a/lisp/textmodes/css-mode.el
+++ b/lisp/textmodes/css-mode.el
@@ -33,6 +33,8 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))
+
 (defun css-extract-keyword-list (res)
   (with-temp-buffer
     (url-insert-file-contents "http://www.w3.org/TR/REC-CSS2/css2.txt")
@@ -270,6 +272,8 @@
         (aset fc c 'indent-according-to-mode))
       (set (make-local-variable 'auto-fill-chars) fc))))
 
+(defvar comment-continue)
+
 (defun css-fill-paragraph (&optional justify)
   (save-excursion
     (let ((ppss (syntax-ppss))
@@ -286,7 +290,7 @@
         ;; css-mode but for all modes.
         (save-restriction
           (narrow-to-region (nth 8 ppss) eol)
-          (comment-normalize-vars)
+          (comment-normalize-vars)      ;Will define comment-continue.
           (let ((fill-paragraph-function nil)
                 (paragraph-separate
                  (if (and comment-continue