[Emacs-diffs] emacs-25 76ef522: Fix (args-out-of-range 1) error in cursor-sensor--detect

[Leo Liu]

branch: emacs-25
commit 76ef52267cf887e3e1aa6d25b3b16dd0601dd459
Author: Leo Liu <address@hidden>
Commit: Leo Liu <address@hidden>

    Fix (args-out-of-range 1) error in cursor-sensor--detect
    
    * lisp/emacs-lisp/cursor-sensor.el (cursor-sensor--detect): Don't
      hard-code (point-min) as 1 which fails in narrowed buffers.
---
 lisp/emacs-lisp/cursor-sensor.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/emacs-lisp/cursor-sensor.el b/lisp/emacs-lisp/cursor-sensor.el
index ac063d48..f1ab82e 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 (= point 1)
+                    (unless (bobp)
                       (get-char-property (1- point) 
'cursor-sensor-functions))))
            (old (window-parameter window 'cursor-sensor--last-state))
            (oldposmark (car old))