[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 609354e 2/4: el-search--ensure-sexp-start: don't assume po
From: |
Michael Heerdegen |
Subject: |
[elpa] master 609354e 2/4: el-search--ensure-sexp-start: don't assume point-min==1 |
Date: |
Sat, 21 May 2016 14:23:40 +0000 (UTC) |
branch: master
commit 609354eb5f60172d00c6d0735a2f25d172da5030
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>
el-search--ensure-sexp-start: don't assume point-min==1
Thanks Stefan.
---
packages/el-search/el-search.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index d267be1..3536f49 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/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))))))