diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2018-11-16 21:52:34 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2018-11-16 21:52:34 +0200 |
| commit | d6542ea0f032d154da5a6e896a860adc9176a00a (patch) | |
| tree | b10c53e36f10fe2b5e85811494cd77edd81ef40f /lisp/play | |
| parent | 936a8f3093f53442bb759880c8cddd5f4eb539a5 (diff) | |
| download | emacs-d6542ea0f032d154da5a6e896a860adc9176a00a.tar.gz | |
Avoid errors in zone.el when there's overlay at EOB
* lisp/play/zone.el (zone): Make sure the window-end position
is calculated accurately, to avoid errors from
buffer-substring. (Bug#33384)
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/zone.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/play/zone.el b/lisp/play/zone.el index 4584d26f385..75f13646190 100644 --- a/lisp/play/zone.el +++ b/lisp/play/zone.el @@ -109,7 +109,7 @@ If the element is a function or a list of a function and a number, (save-window-excursion (let ((f (selected-frame)) (outbuf (get-buffer-create "*zone*")) - (text (buffer-substring (window-start) (window-end))) + (text (buffer-substring (window-start) (window-end nil t))) (wp (1+ (- (window-point) (window-start))))) (put 'zone 'orig-buffer (current-buffer)) |