aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2014-04-02 00:07:11 -0700
committerGlenn Morris2014-04-02 00:07:11 -0700
commit0b908bf2ef8a755cc61425e181f8272e52bc5aaa (patch)
tree264e25a626c91fa878a1d264d9cedf815d476f63
parent9c8b0aa042be6b3c5955f855d0d08ae6beaffd06 (diff)
downloademacs-0b908bf2ef8a755cc61425e181f8272e52bc5aaa.tar.gz
emacs-0b908bf2ef8a755cc61425e181f8272e52bc5aaa.zip
Small codes update for revert-buffer-function no longer being nil by default
* lisp/menu-bar.el (menu-bar-file-menu): * lisp/vc/ediff.el (ediff-current-file): Update for revert-buffer-function no longer being nil by default.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/menu-bar.el7
-rw-r--r--lisp/vc/ediff.el6
3 files changed, 13 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0bfc080f8ec..b1c35a78937 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
12014-04-02 Glenn Morris <rgm@gnu.org> 12014-04-02 Glenn Morris <rgm@gnu.org>
2 2
3 * menu-bar.el (menu-bar-file-menu):
4 * vc/ediff.el (ediff-current-file):
5 Update for revert-buffer-function no longer being nil by default.
6
3 * simple.el (command-execute): Respect nil disabled-command-function. 7 * simple.el (command-execute): Respect nil disabled-command-function.
4 8
52014-04-01 Nicolas Richard <theonewiththeevillook@yahoo.fr> 92014-04-01 Nicolas Richard <theonewiththeevillook@yahoo.fr>
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 0e12c976af0..84df6922749 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -149,8 +149,11 @@
149 :help "Recover edits from a crashed session")) 149 :help "Recover edits from a crashed session"))
150 (bindings--define-key menu [revert-buffer] 150 (bindings--define-key menu [revert-buffer]
151 '(menu-item "Revert Buffer" revert-buffer 151 '(menu-item "Revert Buffer" revert-buffer
152 :enable (or revert-buffer-function 152 :enable (or (not (eq revert-buffer-function
153 revert-buffer-insert-file-contents-function 153 'revert-buffer--default))
154 (not (eq
155 revert-buffer-insert-file-contents-function
156 'revert-buffer-insert-file-contents--default-function))
154 (and buffer-file-number 157 (and buffer-file-number
155 (or (buffer-modified-p) 158 (or (buffer-modified-p)
156 (not (verify-visited-file-modtime 159 (not (verify-visited-file-modtime
diff --git a/lisp/vc/ediff.el b/lisp/vc/ediff.el
index d8abe89d17b..927a3ba7fb6 100644
--- a/lisp/vc/ediff.el
+++ b/lisp/vc/ediff.el
@@ -367,8 +367,10 @@ deleted."
367This command can be used instead of `revert-buffer'. If there is 367This command can be used instead of `revert-buffer'. If there is
368nothing to revert then this command fails." 368nothing to revert then this command fails."
369 (interactive) 369 (interactive)
370 (unless (or revert-buffer-function 370 ;; This duplicates code from menu-bar.el.
371 revert-buffer-insert-file-contents-function 371 (unless (or (not (eq revert-buffer-function 'revert-buffer--default))
372 (not (eq revert-buffer-insert-file-contents-function
373 'revert-buffer-insert-file-contents--default-function))
372 (and buffer-file-number 374 (and buffer-file-number
373 (or (buffer-modified-p) 375 (or (buffer-modified-p)
374 (not (verify-visited-file-modtime 376 (not (verify-visited-file-modtime