Mercurial > emacs
changeset 66132:3fe20f1edf7b
* longlines.el (longlines-search-forward)
(longlines-search-backward): Match any number of spaces.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sun, 16 Oct 2005 23:46:15 +0000 |
| parents | 698673f02315 |
| children | 3e340cd42f9f |
| files | lisp/ChangeLog lisp/longlines.el |
| diffstat | 2 files changed, 7 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Oct 16 21:49:00 2005 +0000 +++ b/lisp/ChangeLog Sun Oct 16 23:46:15 2005 +0000 @@ -1,3 +1,8 @@ +2005-10-16 Chong Yidong <cyd@stupidchicken.com> + + * longlines.el (longlines-search-forward) + (longlines-search-backward): Match any number of spaces. + 2005-10-16 Thien-Thi Nguyen <ttn@gnu.org> * diff-mode.el (diff-mode): Doc fix.
--- a/lisp/longlines.el Sun Oct 16 21:49:00 2005 +0000 +++ b/lisp/longlines.el Sun Oct 16 23:46:15 2005 +0000 @@ -398,11 +398,11 @@ '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))) ;; Loading and saving