Commit f905e56a authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(log-edit-done): Thinko in the "same comment" detection.

parent 2082fe81
......@@ -5,7 +5,7 @@
;; Author: Stefan Monnier <>
;; 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 @@ If you want to abort the commit, simply delete the buffer."
(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)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment