* vc/vc-hooks.el (vc-file-clearprops): Kill vc-parent-buffer.

Suggested by Dan Nicolaescu. Fixes: debbugs:6326

* vc/vc-hooks.el (vc-file-clearprops): Kill vc-parent-buffer.
Suggested by Dan Nicolaescu. Fixes: debbugs:6326
1dc2755a · Chong Yidong · 329c48d8 · 1dc2755a · 1dc2755a
Commit 1dc2755a authored Oct 29, 2012 by Chong Yidong
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 0 deletions

lisp/ChangeLog lisp/ChangeLog +3 -0

lisp/vc/vc-hooks.el lisp/vc/vc-hooks.el +2 -0

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
 2012-10-29  Chong Yidong  <cyd@gnu.org>
  
+	* vc/vc-hooks.el (vc-file-clearprops): Kill vc-parent-buffer.
+	Suggested by Dan Nicolaescu (Bug#6326).
+
 	* info.el (Info-complete-menu-item): Avoid duplicates (Bug#12705).
  
 	* startup.el (fancy-about-screen): Don't message (Bug#12680).

--- a/lisp/vc/vc-hooks.el
+++ b/lisp/vc/vc-hooks.el
@@ -224,6 +224,8 @@ VC commands are globally reachable under the prefix `\\[vc-prefix-map]':

 (defun vc-file-clearprops (file)
  "Clear all VC properties of FILE."
+  (if (boundp 'vc-parent-buffer)
+      (kill-local-variable 'vc-parent-buffer))
  (setplist (intern file vc-file-prop-obarray) nil))