# HG changeset patch
# User Jason Rumney <jasonr@gnu.org>
# Date 1174743561 0
# Node ID 596838644e8e7ece3f4458bcd465f62ee875f3ee
# Parent  a1bfaeef534b38e04b628dd77f539bf7937dab4f
(find-file-hook, auto-revert-tail-mode):
Use file size in bytes for auto-revert-tail-pos not characters.

diff -r a1bfaeef534b -r 596838644e8e lisp/autorevert.el
--- a/lisp/autorevert.el	Sat Mar 24 13:38:43 2007 +0000
+++ b/lisp/autorevert.el	Sat Mar 24 13:39:21 2007 +0000
@@ -278,7 +278,7 @@
 (add-hook 'find-file-hook
 	  (lambda ()
 	    (set (make-local-variable 'auto-revert-tail-pos)
-		 (save-restriction (widen) (1- (point-max))))))
+		 (nth 7 (file-attributes buffer-file-name)))))
 
 ;; Functions:
 
@@ -341,7 +341,7 @@
       (add-hook 'before-save-hook (lambda () (auto-revert-tail-mode 0)) nil t)
       (or (local-variable-p 'auto-revert-tail-pos) ; don't lose prior position
 	  (set (make-local-variable 'auto-revert-tail-pos)
-	       (save-restriction (widen) (1- (point-max)))))
+	       (nth 7 (file-attributes buffer-file-name))))
       ;; let auto-revert-mode set up the mechanism for us if it isn't already
       (or auto-revert-mode
 	  (let ((auto-revert-tail-mode t))