aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/longlines.el4
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5ac616dbe46..b448ead1d47 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12005-10-16 Chong Yidong <cyd@stupidchicken.com>
2
3 * longlines.el (longlines-search-forward)
4 (longlines-search-backward): Match any number of spaces.
5
12005-10-16 Thien-Thi Nguyen <ttn@gnu.org> 62005-10-16 Thien-Thi Nguyen <ttn@gnu.org>
2 7
3 * diff-mode.el (diff-mode): Doc fix. 8 * diff-mode.el (diff-mode): Doc fix.
diff --git a/lisp/longlines.el b/lisp/longlines.el
index 9665931e046..00a2782d0a3 100644
--- a/lisp/longlines.el
+++ b/lisp/longlines.el
@@ -398,11 +398,11 @@ This is called by `window-size-change-functions'."
398 'longlines-search-backward)))) 398 'longlines-search-backward))))
399 399
400(defun longlines-search-forward (string &optional bound noerror count) 400(defun longlines-search-forward (string &optional bound noerror count)
401 (let ((search-spaces-regexp "[ \n]")) 401 (let ((search-spaces-regexp "[ \n]+"))
402 (re-search-forward (regexp-quote string) bound noerror count))) 402 (re-search-forward (regexp-quote string) bound noerror count)))
403 403
404(defun longlines-search-backward (string &optional bound noerror count) 404(defun longlines-search-backward (string &optional bound noerror count)
405 (let ((search-spaces-regexp "[ \n]")) 405 (let ((search-spaces-regexp "[ \n]+"))
406 (re-search-backward (regexp-quote string) bound noerror count))) 406 (re-search-backward (regexp-quote string) bound noerror count)))
407 407
408;; Loading and saving 408;; Loading and saving