[elpa] externals/el-search 4d6b361 097/332: el-search--ensure-sexp-start: don't assume point-min==1

[Stefan Monnier]

branch: externals/el-search
commit 4d6b36116695107d0b12a91df9ca84d3a6390430
Author: Michael Heerdegen <michael_heerdegen@web.de>
Commit: Michael Heerdegen <michael_heerdegen@web.de>

    el-search--ensure-sexp-start: don't assume point-min==1
    
    Thanks Stefan.
---
 el-search.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/el-search.el b/el-search.el
index d267be1..3536f49 100644
--- a/el-search.el
+++ b/el-search.el
@@ -389,7 +389,7 @@ and return it."
     (while not-done
       (let ((stop-here nil)
             (looking-at-from-back (lambda (regexp n)
-                                    (and (> (point) n)
+                                    (and (<= n (- (point) (point-min)))
                                          (save-excursion
                                            (backward-char n)
                                            (looking-at regexp))))))