diff options
| author | Jason Merrill <jason@redhat.com> | 2011-03-30 17:56:04 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-03-30 17:56:04 -0400 |
| commit | f3e4086c9ddb2df447907aaf8fc403426b724408 (patch) | |
| tree | 995956765615b869b3071626b9760b1f35f0e787 | |
| parent | 44f230aa043ebb222aa0876b44d70484d5dd38db (diff) | |
| download | emacs-f3e4086c9ddb2df447907aaf8fc403426b724408.tar.gz | |
* lisp/vc/add-log.el (add-change-log-entry): Don't use whitespace
syntax class to search for whitespace on a single line
(Message-ID: <4D938140.4030905@redhat.com>).
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/vc/add-log.el | 4 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7ce8b62b333..3c9e81f0b8a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2011-03-30 Jason Merrill <jason@redhat.com> (tiny change) + + * vc/add-log.el (add-change-log-entry): Don't use whitespace + syntax class to search for whitespace on a single line + (Message-ID: <4D938140.4030905@redhat.com>). + 2011-03-30 Leo Liu <sdl.web@gmail.com> * abbrev.el (abbrev-edit-save-to-file, abbrev-edit-save-buffer): diff --git a/lisp/vc/add-log.el b/lisp/vc/add-log.el index d75fcb5f4f1..e9fbdb91e97 100644 --- a/lisp/vc/add-log.el +++ b/lisp/vc/add-log.el @@ -886,7 +886,7 @@ non-nil, otherwise in local time." (point)))) ;; Now insert the new line for this item. - (cond ((re-search-forward "^\\s *\\*\\s *$" bound t) + (cond ((re-search-forward "^\\s *\\* *$" bound t) ;; Put this file name into the existing empty item. (if item (insert item))) @@ -928,7 +928,7 @@ non-nil, otherwise in local time." ;; No function name, so put in a colon unless we have just a star. (unless (save-excursion (beginning-of-line 1) - (looking-at "\\s *\\(\\*\\s *\\)?$")) + (looking-at "\\s *\\(\\* *\\)?$")) (insert ": ") (if version (insert version ?\s))) ;; Make it easy to get rid of the function name. |