(longlines-search-forward, longlines-search-backward)

(longlines-re-search-forward): Use a smarter search-spaces-regexp.

diff --git a/lisp/longlines.el b/lisp/longlines.el
index 76989c92af2cafa7931ca50cf5d89317d01e25ac..885909840a30b9668e2649abdb157ef1983536f8 100644 (file)
--- a/lisp/longlines.el
+++ b/lisp/longlines.el
@@ -464,15 +464,15 @@ This is called by `window-configuration-change-hook'."
       'longlines-search-backward))))
 
 (defun longlines-search-forward (string &optional bound noerror count)
-  (let ((search-spaces-regexp "[ \n]+"))
+  (let ((search-spaces-regexp " *[ \n]"))
     (re-search-forward (regexp-quote string) bound noerror count)))
 
 (defun longlines-search-backward (string &optional bound noerror count)
-  (let ((search-spaces-regexp "[ \n]+"))
+  (let ((search-spaces-regexp " *[ \n]"))
     (re-search-backward (regexp-quote string) bound noerror count)))
 
 (defun longlines-re-search-forward (string &optional bound noerror count)
-  (let ((search-spaces-regexp "[ \n]"))
+  (let ((search-spaces-regexp " *[ \n]"))
     (re-search-forward string bound noerror count)))
 
 ;; Loading and saving