[AUCTeX-diffs] Changes to auctex/font-latex.el,v

[Ralf Angeli]

CVSROOT:        /cvsroot/auctex
Module name:    auctex
Changes by:     Ralf Angeli <angeli>    06/06/05 20:18:31

Index: font-latex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/font-latex.el,v
retrieving revision 5.156
retrieving revision 5.157
diff -u -b -r5.156 -r5.157
--- font-latex.el       4 Jun 2006 19:36:59 -0000       5.156
+++ font-latex.el       5 Jun 2006 20:18:31 -0000       5.157
@@ -94,6 +94,7 @@
 
 (defvar font-latex-quote-regexp-beg nil
   "Regexp used to find quotes.")
+(make-variable-buffer-local 'font-latex-quote-regexp-beg)
 
 (defvar font-latex-quote-list '(("``" "''") ("<<" ">>" french) ("«" "»" 
french))
   "List of quote specifiers for quotation fontification.
@@ -114,6 +115,7 @@
 
 (defvar font-latex-quotes-control nil
   "Internal variable for keeping track if `font-latex-quotes' changed.")
+(make-variable-buffer-local 'font-latex-quotes-control)
 
 (defvar font-latex-quotes-internal nil
   "Internal variable for tracking outcome of automatic detection.
@@ -149,8 +151,7 @@
   "Add QUOTES to `font-latex-quote-list'.
 QUOTES has to be a list adhering to the format of an element of
 `font-latex-quote-list'."
-  (set (make-local-variable 'font-latex-quotes-control) nil)
-  (make-local-variable 'font-latex-quote-regexp-beg)
+  (setq font-latex-quotes-control nil)
   (make-local-variable 'font-latex-quote-list)
   (add-to-list 'font-latex-quote-list quotes))