From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 31 Oct 2015 13:31:17 +0000 (+0200)
Subject: Avoid errors in redisplay--pre-redisplay-functions
X-Git-Tag: emacs-25.0.90~950^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=553d7e9b384b9c9a8500c5229e1dbc76002d5a10;p=emacs.git

Avoid errors in redisplay--pre-redisplay-functions

* lisp/emacs-lisp/cursor-sensor.el (cursor-sensor--detect): Don't
use 'bobp', instead compare window-point with 1.  (Bug#21730)
---

diff --git a/lisp/emacs-lisp/cursor-sensor.el b/lisp/emacs-lisp/cursor-sensor.el
index 1d1780baed0..2fc7a0d1513 100644
--- a/lisp/emacs-lisp/cursor-sensor.el
+++ b/lisp/emacs-lisp/cursor-sensor.el
@@ -113,7 +113,7 @@
            ;; non-sticky on both ends, but that means get-pos-property might
            ;; never see it.
            (new (or (get-char-property point 'cursor-sensor-functions)
-                    (unless (bobp)
+                    (unless (= point 1)
                       (get-char-property (1- point) 'cursor-sensor-functions))))
            (old (window-parameter window 'cursor-sensor--last-state))
            (oldposmark (car old))