diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-11-04 15:45:36 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-11-04 15:45:36 -0500 |
| commit | a0d5f7a4a3c9136ba9b2ab6deec28222c0c8b513 (patch) | |
| tree | 480340d948463635b02cdec6c157d11b604bcfc3 /lisp/rect.el | |
| parent | c93f3f5c5c7d682faf14f908e960632f451cb847 (diff) | |
| download | emacs-a0d5f7a4a3c9136ba9b2ab6deec28222c0c8b513.tar.gz | |
* lisp/rect.el (rectangle--highlight-for-redisplay):
* lisp/emacs-lisp/smie.el (smie--next-indent-change):
Use buffer-chars-modified-tick.
Diffstat (limited to 'lisp/rect.el')
| -rw-r--r-- | lisp/rect.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/rect.el b/lisp/rect.el index 5f4f1672bdd..4335bb25409 100644 --- a/lisp/rect.el +++ b/lisp/rect.el @@ -481,7 +481,7 @@ Activates the region if needed. Only lasts until the region is deactivated." ((not rectangle-mark-mode) (funcall orig start end window rol)) ((and (eq 'rectangle (car-safe rol)) - (eq (nth 1 rol) (buffer-modified-tick)) + (eq (nth 1 rol) (buffer-chars-modified-tick)) (eq start (nth 2 rol)) (eq end (nth 3 rol))) rol) @@ -562,7 +562,7 @@ Activates the region if needed. Only lasts until the region is deactivated." (push ol nrol)) (forward-line 1)) (mapc #'delete-overlay old) - `(rectangle ,(buffer-modified-tick) ,start ,end ,@nrol)))))) + `(rectangle ,(buffer-chars-modified-tick) ,start ,end ,@nrol)))))) (defun rectangle--unhighlight-for-redisplay (orig rol) (if (not (eq 'rectangle (car-safe rol))) |