diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2011-04-13 16:27:41 +0200 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2011-04-13 16:27:41 +0200 |
commit | 06641a4768b86697dc495459a01431c0f61041d3 (patch) | |
tree | 0407eff23d319ac98f76bb918996ca4f819e90b7 /lisp | |
parent | 9ec6a31795c97fa05c268d297ff39fbb278ead96 (diff) | |
download | emacs-06641a4768b86697dc495459a01431c0f61041d3.tar.gz |
lisp/autorevert.el: Use `remote-file-name-inhibit-cache'.
* autorevert.el (auto-revert-handler):
Bind `remote-file-name-inhibit-cache', not `tramp-cache-inhibit-cache',
which was removed in 2010-10-02T13:21:43Z!michael.albinus@gmx.de.
Don't quote lambda.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/autorevert.el | 14 |
2 files changed, 12 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5f04d5a2f11..e18f562eaf3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,10 @@ 2011-04-13 Juanma Barranquero <lekktu@gmail.com> + * autorevert.el (auto-revert-handler): + Bind `remote-file-name-inhibit-cache', not `tramp-cache-inhibit-cache', + which was removed in 2010-10-02T13:21:43Z!michael.albinus@gmx.de. + Don't quote lambda. + * image-mode.el (image-transform-set-scale): Fix change in 2011-04-09T20:28:01Z!cyd@stupidchicken.com. diff --git a/lisp/autorevert.el b/lisp/autorevert.el index 2bc7310d7e5..c67b6663bd0 100644 --- a/lisp/autorevert.el +++ b/lisp/autorevert.el @@ -434,9 +434,9 @@ This is an internal function used by Auto-Revert Mode." (file-readable-p buffer-file-name) (if auto-revert-tail-mode ;; Tramp caches the file attributes. Setting - ;; `tramp-cache-inhibit' forces Tramp to - ;; reread the values. - (let ((tramp-cache-inhibit-cache t)) + ;; `remote-file-name-inhibit-cache' forces Tramp + ;; to reread the values. + (let ((remote-file-name-inhibit-cache t)) (/= auto-revert-tail-pos (setq size (nth 7 (file-attributes @@ -460,10 +460,10 @@ This is an internal function used by Auto-Revert Mode." (when buffer-file-name (setq eob (eobp)) (walk-windows - #'(lambda (window) - (and (eq (window-buffer window) buffer) - (= (window-point window) (point-max)) - (push window eoblist))) + (lambda (window) + (and (eq (window-buffer window) buffer) + (= (window-point window) (point-max)) + (push window eoblist))) 'no-mini t)) (if auto-revert-tail-mode (auto-revert-tail-handler size) |