Mercurial > emacs
changeset 109043:50dd8d98f75b
* lisp/vc/vc.el (vc-diff-internal): Set `revert-buffer-function'
buffer-locally to lambda that re-runs the vc diff command. (Bug#6447)
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Fri, 25 Jun 2010 00:38:07 +0300 |
parents | 87285390c61e |
children | f0d32dbd0fcf |
files | lisp/ChangeLog lisp/vc/vc.el |
diffstat | 2 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Jun 24 15:16:33 2010 -0400 +++ b/lisp/ChangeLog Fri Jun 25 00:38:07 2010 +0300 @@ -1,3 +1,9 @@ +2010-06-24 Juri Linkov <juri@jurta.org> + + * vc/vc.el (vc-diff-internal): Set `revert-buffer-function' + buffer-locally to lambda that re-runs the vc diff command. + (Bug#6447) + 2010-06-24 Chong Yidong <cyd@stupidchicken.com> * kmacro.el (kmacro-call-macro): Don't issue hint message if the
--- a/lisp/vc/vc.el Thu Jun 24 15:16:33 2010 -0400 +++ b/lisp/vc/vc.el Fri Jun 25 00:38:07 2010 +0300 @@ -1547,6 +1547,9 @@ (message "%s" (cdr messages)) nil) (diff-mode) + (set (make-local-variable 'revert-buffer-function) + `(lambda (ignore-auto noconfirm) + (vc-diff-internal ,async ',vc-fileset ,rev1 ,rev2 ,verbose))) ;; Make the *vc-diff* buffer read only, the diff-mode key ;; bindings are nicer for read only buffers. pcl-cvs does the ;; same thing.