Mercurial > emacs

changeset 95043:4a0b47d5274d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Clean up after granbbing CVS/Root info.
author Eric S. Raymond <esr@snark.thyrsus.com>
date Fri, 16 May 2008 09:30:17 +0000
parents 0f15001fd142
children f4fac6175e87
files lisp/vc-cvs.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc-cvs.el	Fri May 16 09:23:22 2008 +0000
+++ b/lisp/vc-cvs.el	Fri May 16 09:30:17 2008 +0000
@@ -927,7 +927,7 @@
 	     (save-excursion 
 	       (set-buffer (find-file-noselect "CVS/Root" t))
 	       (and (looking-at ":ext:") (delete-char 5))
-	       (buffer-string))
+	       (prog1 (buffer-string) (not-modified) (kill-buffer nil)))
 	   nil)))
     (concat
      ;; FIXME: see how PCL-CVS gets the data to print all these