Commit 90e118ab authored by Luc Teirlinck's avatar Luc Teirlinck

(auto-revert-handler): Bind `buffer-read-only' locally around the call

to `revert-buffer'.
parent 9e68f42d
2004-09-03 Luc Teirlinck <teirllm@auburn.edu>
* autorevert.el (auto-revert-handler): Bind `buffer-read-only'
locally around the call to `revert-buffer'.
2004-09-03 Juri Linkov <juri@jurta.org>
* isearch.el (isearch-toggle-regexp): Set `isearch-success' and
......
......@@ -421,7 +421,8 @@ This is an internal function used by Auto-Revert Mode."
'no-mini t))
(if auto-revert-tail-mode
(auto-revert-tail-handler)
(revert-buffer 'ignore-auto 'dont-ask 'preserve-modes))
(let ((buffer-read-only buffer-read-only))
(revert-buffer 'ignore-auto 'dont-ask 'preserve-modes)))
(when buffer-file-name
(when eob (goto-char (point-max)))
(dolist (window eoblist)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment