diff options
| author | Stefan Monnier | 2016-06-22 09:44:24 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2016-06-22 09:44:24 -0400 |
| commit | 8270a64d530212002dfdb39f4504c07100425bfb (patch) | |
| tree | c8bd6cb2212fb46e914d05b1e14ee106f5afb512 | |
| parent | 81fc9a7c28f5f120fc0e4a121902475bd5c2bfeb (diff) | |
| download | emacs-8270a64d530212002dfdb39f4504c07100425bfb.tar.gz emacs-8270a64d530212002dfdb39f4504c07100425bfb.zip | |
* lisp/emacs-lisp/syntax.el (syntax-propertize): Flush extended region.
| -rw-r--r-- | lisp/emacs-lisp/syntax.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/syntax.el b/lisp/emacs-lisp/syntax.el index 31fc67ec815..ac509b3465d 100644 --- a/lisp/emacs-lisp/syntax.el +++ b/lisp/emacs-lisp/syntax.el | |||
| @@ -316,6 +316,9 @@ END) suitable for `syntax-propertize-function'." | |||
| 316 | (unless (eq funs | 316 | (unless (eq funs |
| 317 | (cdr syntax-propertize-extend-region-functions)) | 317 | (cdr syntax-propertize-extend-region-functions)) |
| 318 | (setq funs syntax-propertize-extend-region-functions))))) | 318 | (setq funs syntax-propertize-extend-region-functions))))) |
| 319 | ;; Flush ppss cache between the original value of `start' and that | ||
| 320 | ;; set above by syntax-propertize-extend-region-functions. | ||
| 321 | (syntax-ppss-flush-cache start) | ||
| 319 | ;; Move the limit before calling the function, so the function | 322 | ;; Move the limit before calling the function, so the function |
| 320 | ;; can use syntax-ppss. | 323 | ;; can use syntax-ppss. |
| 321 | (setq syntax-propertize--done end) | 324 | (setq syntax-propertize--done end) |