Mercurial > emacs
changeset 29398:8a911c182035
(log-edit-done): Thinko in the "same comment" detection.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 02 Jun 2000 23:03:31 +0000 |
| parents | 9579da078de6 |
| children | addeae19bf96 |
| files | lisp/log-edit.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/log-edit.el Fri Jun 02 20:07:12 2000 +0000 +++ b/lisp/log-edit.el Fri Jun 02 23:03:31 2000 +0000 @@ -5,7 +5,7 @@ ;; Author: Stefan Monnier <monnier@cs.yale.edu> ;; Keywords: pcl-cvs cvs commit log ;; Version: $Name: $ -;; Revision: $Id: log-edit.el,v 1.5 2000/05/21 02:13:26 monnier Exp $ +;; Revision: $Id: log-edit.el,v 1.6 2000/06/02 02:28:39 monnier Exp $ ;; This file is part of GNU Emacs. @@ -205,7 +205,9 @@ (goto-char (point-max)) (insert ?\n))) (let ((comment (buffer-string))) - (when (and (boundp 'vc-comment-ring) (ring-p vc-comment-ring) + (when (and (boundp 'vc-comment-ring) + (ring-p vc-comment-ring) + (not (ring-empty-p vc-comment-ring)) (not (equal comment (ring-ref vc-comment-ring 0)))) (ring-insert vc-comment-ring comment))) (let ((win (get-buffer-window log-edit-files-buf)))