From 609354eb5f60172d00c6d0735a2f25d172da5030 Mon Sep 17 00:00:00 2001 From: Michael Heerdegen Date: Sat, 21 May 2016 16:19:00 +0200 Subject: [PATCH] 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 d267be11e..3536f4981 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)))))) -- 2.39.2