From f3e4086c9ddb2df447907aaf8fc403426b724408 Mon Sep 17 00:00:00 2001 From: Jason Merrill Date: Wed, 30 Mar 2011 17:56:04 -0400 Subject: [PATCH] * 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>). --- lisp/ChangeLog | 6 ++++++ 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 (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 * 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. -- 2.39.2