diff options
| author | Richard M. Stallman | 2005-05-29 08:39:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-05-29 08:39:40 +0000 |
| commit | a1594703887d102b8f64f9672500ee3222a3fc0b (patch) | |
| tree | 4a4a80e7f1c675d3b89c8ed5ecca53272bcc051c | |
| parent | cfde584f6d25db8c0ba229ebb85fba60e99eb1af (diff) | |
| download | emacs-a1594703887d102b8f64f9672500ee3222a3fc0b.tar.gz emacs-a1594703887d102b8f64f9672500ee3222a3fc0b.zip | |
(font-lock-fontify-syntactically-region):
Pass t for GREEDY to looking-back.
| -rw-r--r-- | lisp/font-lock.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index 4ad82a39b7e..d2507474f12 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el | |||
| @@ -1351,7 +1351,7 @@ START should be at the beginning of a line." | |||
| 1351 | comment-start-skip)) | 1351 | comment-start-skip)) |
| 1352 | (put-text-property beg (match-end 0) 'face | 1352 | (put-text-property beg (match-end 0) 'face |
| 1353 | font-lock-comment-delimiter-face))) | 1353 | font-lock-comment-delimiter-face))) |
| 1354 | (if (looking-back comment-end-regexp (point-at-bol)) | 1354 | (if (looking-back comment-end-regexp (point-at-bol) t) |
| 1355 | (put-text-property (match-beginning 0) (point) 'face | 1355 | (put-text-property (match-beginning 0) (point) 'face |
| 1356 | font-lock-comment-delimiter-face)))) | 1356 | font-lock-comment-delimiter-face)))) |
| 1357 | (< (point) end)) | 1357 | (< (point) end)) |