Mercurial > emacs
changeset 97581:467117d63e34
Revert last change.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Wed, 20 Aug 2008 22:48:55 +0000 |
| parents | 876b21ddd885 |
| children | fdc98979ca2b |
| files | lisp/ChangeLog lisp/wdired.el |
| diffstat | 2 files changed, 0 insertions(+), 17 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Aug 20 22:43:52 2008 +0000 +++ b/lisp/ChangeLog Wed Aug 20 22:48:55 2008 +0000 @@ -1,10 +1,3 @@ -2008-08-20 Chong Yidong <cyd@stupidchicken.com> - - * wdired.el (wdired-old-auto-revert-mode): New var. - (wdired-change-to-wdired-mode): Turn off auto-revert-mode. - (wdired-change-to-dired-mode): Turn auto-revert-mode on if it used - to be on. - 2008-08-20 Kevin Ryde <user42@zip.com.au> * textmodes/nroff-mode.el (nroff-mode): Avoid auto-filling on
--- a/lisp/wdired.el Wed Aug 20 22:43:52 2008 +0000 +++ b/lisp/wdired.el Wed Aug 20 22:48:55 2008 +0000 @@ -207,7 +207,6 @@ (defvar wdired-col-perm) ;; Column where the permission bits start (defvar wdired-old-content) (defvar wdired-old-point) -(defvar wdired-old-auto-revert-mode nil) (defun wdired-mode () @@ -243,10 +242,6 @@ (buffer-substring (point-min) (point-max))) (set (make-local-variable 'wdired-old-point) (point)) (set (make-local-variable 'query-replace-skip-read-only) t) - (when (and (boundp 'auto-revert-mode) - auto-revert-mode) - (set (make-local-variable 'wdired-old-auto-revert-mode) t) - (auto-revert-mode 0)) (use-local-map wdired-mode-map) (force-mode-line-update) (setq buffer-read-only nil) @@ -354,11 +349,6 @@ (setq mode-name "Dired") (dired-advertise) (remove-hook 'kill-buffer-hook 'wdired-check-kill-buffer t) - (when wdired-old-auto-revert-mode - (kill-local-variable 'wdired-old-auto-revert-mode) - (and (boundp 'auto-revert-mode) - (null auto-revert-mode) - (auto-revert-mode 1))) (set (make-local-variable 'revert-buffer-function) 'dired-revert))