diff options
| -rw-r--r-- | lisp/progmodes/cc-mode.el | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el index 9f95a9ce48b..fd7750b0d82 100644 --- a/lisp/progmodes/cc-mode.el +++ b/lisp/progmodes/cc-mode.el | |||
| @@ -1992,17 +1992,16 @@ Note that this is a strict tail, so won't match, e.g. \"0x....\".") | |||
| 1992 | 1992 | ||
| 1993 | ;; Note: c-just-done-before-change is nil, t, or 'whole-buffer. | 1993 | ;; Note: c-just-done-before-change is nil, t, or 'whole-buffer. |
| 1994 | (unless (c-called-from-text-property-change-p) | 1994 | (unless (c-called-from-text-property-change-p) |
| 1995 | (save-restriction | 1995 | (unless (eq c-just-done-before-change t) |
| 1996 | (widen) | 1996 | (save-restriction |
| 1997 | (unless c-just-done-before-change | 1997 | (widen) |
| 1998 | (c-before-change (point-min) (point-max))) | 1998 | (when (null c-just-done-before-change) |
| 1999 | (unless (eq c-just-done-before-change t) | 1999 | (c-before-change (point-min) (point-max))) |
| 2000 | (setq beg (point-min) | 2000 | (setq beg (point-min) |
| 2001 | end (point-max) | 2001 | end (point-max) |
| 2002 | old-len (- end beg) | 2002 | old-len (- end beg) |
| 2003 | c-new-BEG (point-min) | 2003 | c-new-BEG (point-min) |
| 2004 | c-new-END (point-max))) | 2004 | c-new-END (point-max))))) |
| 2005 | (setq c-just-done-before-change nil))) | ||
| 2006 | 2005 | ||
| 2007 | ;; (c-new-BEG c-new-END) will be the region to fontify. It may become | 2006 | ;; (c-new-BEG c-new-END) will be the region to fontify. It may become |
| 2008 | ;; larger than (beg end). | 2007 | ;; larger than (beg end). |