From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 16 Nov 2018 19:52:34 +0000 (+0200)
Subject: Avoid errors in zone.el when there's overlay at EOB
X-Git-Tag: emacs-26.1.90~4
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d6542ea0f032d154da5a6e896a860adc9176a00a;p=emacs.git

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)
---

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))