emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r102005: cc-mode.el (c-before-change,


From: Alan Mackenzie
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r102005: cc-mode.el (c-before-change, c-after-change): Move the setting of
Date: Tue, 19 Oct 2010 20:18:35 +0000
User-agent: Bazaar (2.0.3)

------------------------------------------------------------
revno: 102005
committer: Alan Mackenzie <address@hidden>
branch nick: trunk
timestamp: Tue 2010-10-19 20:18:35 +0000
message:
  cc-mode.el (c-before-change, c-after-change): Move the setting of
  c-new-BEG and c-new-END from c-before-change to c-after-change.
modified:
  lisp/ChangeLog
  lisp/progmodes/cc-mode.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-10-19 19:22:40 +0000
+++ b/lisp/ChangeLog    2010-10-19 20:18:35 +0000
@@ -1,3 +1,9 @@
+2010-10-19  Alan Mackenzie  <address@hidden>
+
+       * progmodes/cc-mode.el (c-before-change, c-after-change): Move the
+       setting of c-new-BEG and c-new-END from c-before-change to
+       c-after-change.
+
 2010-10-19  Chong Yidong  <address@hidden>
 
        * cus-face.el (custom-theme-set-faces): Revert 2010-10-18 change.

=== modified file 'lisp/progmodes/cc-mode.el'
--- a/lisp/progmodes/cc-mode.el 2010-10-03 01:53:04 +0000
+++ b/lisp/progmodes/cc-mode.el 2010-10-19 20:18:35 +0000
@@ -1029,10 +1029,6 @@
                            (buffer-substring-no-properties type-pos term-pos)
                            (buffer-substring-no-properties beg end)))))))
 
-       ;; (c-new-BEG c-new-END) will be the region to fontify.  It may become
-       ;; larger than (beg end).
-       (setq c-new-BEG beg
-             c-new-END end)
        (if c-get-state-before-change-functions
            (mapc (lambda (fn)
                    (funcall fn beg end))
@@ -1086,6 +1082,10 @@
        (when c-recognize-<>-arglists
          (c-after-change-check-<>-operators beg end))
 
+       ;; (c-new-BEG c-new-END) will be the region to fontify.  It may become
+       ;; larger than (beg end).
+       (setq c-new-BEG beg
+             c-new-END end)
        (if c-before-font-lock-function
            (save-excursion
              (funcall c-before-font-lock-function beg end old-len)))))))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]