Fix references to jit-lock properties.

* progmodes/perl-mode.el (perl-font-lock-syntactic-keywords):
  Refer to jit-lock-defer-multiline, not jit-lock-multiline.
  (perl-font-lock-special-syntactic-constructs):
  Quote jit-lock-defer-multiline property.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dfd2a3687f3490567dd91e055c6103b74527e133..66710ac75ec0203888c8b1f0e18a2891d83ff782 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2009-11-30  Juanma Barranquero  <lekktu@gmail.com>
+
+       Fix references to jit-lock properties.
+       * progmodes/perl-mode.el (perl-font-lock-syntactic-keywords):
+       Refer to jit-lock-defer-multiline, not jit-lock-multiline.
+       (perl-font-lock-special-syntactic-constructs):
+       Quote jit-lock-defer-multiline property.
+
 2009-11-30  Dan Nicolaescu  <dann@ics.uci.edu>
 
        * vc-git.el (vc-git-registered): Call vc-git-root only once.
@@ -972,13 +980,13 @@
        * calc/calc-menu.el (calc-arithmetic-menu): Remove `calc-symclip'.
 
        * calc/calc-map.el (calc-get-operator, calc-b-oper-keys):
-       * calc/calc-help.el (calc-b-prefix-help):  Remove references to
+       * calc/calc-help.el (calc-b-prefix-help): Remove references to
        `calc-symclip'.
 
 2009-11-16  Kevin Ryde  <user42@zip.com.au>
 
        * textmodes/flyspell.el (sgml-mode-flyspell-verify):
-       Use `sgml-lexical-context' instead of own parse for tag (Bug#4511).
+       Use `sgml-lexical-context' instead of own parse for tag (Bug#4511).
 
        * emacs-lisp/lisp-mnt.el (lm-keywords): Allow multi-line keywords.
        (lm-keywords-list): Allow comma-only separator like "foo,bar".
@@ -988,7 +996,7 @@
 
 2009-11-16  Dan Nicolaescu  <dann@ics.uci.edu>
 
-       * vc.el (vc-log-show-limit): Default to 2000.
+       * vc.el (vc-log-show-limit): Default to 2000.
        (vc-print-log-internal): Insert buttons to request more entries
        when limiting the output.
 
@@ -1050,7 +1058,7 @@
        `calc-symclip'.
        (calc-modes-menu): Add item for twos complement mode.
 
-       * calc/calc-help.el (calc-b-prefix-help):  Add help for `calc-symclip'.
+       * calc/calc-help.el (calc-b-prefix-help): Add help for `calc-symclip'.
 
 2009-11-15  Chong Yidong  <cyd@stupidchicken.com>
 
@@ -1271,7 +1279,7 @@
 
        * textmodes/artist.el (artist-mouse-choose-operation):
        Call `tmm-prompt' instead of `x-popup-menu' if we cannot popup
-       menus. Bug noticed by Eli Zaretskii <eliz@gnu.org>.
+       menus.  Bug noticed by Eli Zaretskii <eliz@gnu.org>.
        (artist-compute-up-event-key): New function.
        (artist-mouse-choose-operation, artist-down-mouse-1): Call it.
 

diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el
index eaa9bbc6af13d0f2271041b592a01ba64cc3fa52..563bd10d39d166f9e5e94790fe9cf9a3e5747ffc 100644 (file)
--- a/lisp/progmodes/perl-mode.el
+++ b/lisp/progmodes/perl-mode.el
@@ -287,7 +287,7 @@ The expansion is entirely correct because it uses the C preprocessor."
                    ;; the syntax-table before point, but better than nothing.
                    (forward-comment (- (point-max)))
                    (put-text-property (point) (match-end 2)
-                                      'jit-lock-multiline t)
+                                      'jit-lock-defer-multiline t)
                    (not (memq (char-before)
                               '(?? ?: ?. ?, ?\; ?= ?! ?~ ?\( ?\[)))))
             nil ;; A division sign instead of a regexp-match.
@@ -387,7 +387,7 @@ The expansion is entirely correct because it uses the C preprocessor."
                                         (perl-quote-syntax-table (char-after))
                                       (forward-sexp 1))
                                     (put-text-property pos (line-end-position)
-                                                    jit-lock-defer-multiline t)
+                                                       'jit-lock-defer-multiline t)
                                     (looking-at "\\s-*\\sw*e")))
                             (put-text-property (point) (1+ (point))
                                                'syntax-table