diff lisp/files.el @ 2434:ba1cb56059fb

[xemacs-hg @ 2004-12-12 02:47:06 by ben] "Son of a bitch." files.el: File positions are 0 based not 1 based.
author ben
date Sun, 12 Dec 2004 02:47:09 +0000
parents ce294639d321
children 5402bf7d11a5
line wrap: on
line diff
--- a/lisp/files.el	Sat Dec 11 22:51:33 2004 +0000
+++ b/lisp/files.el	Sun Dec 12 02:47:09 2004 +0000
@@ -2107,7 +2107,7 @@
   (save-excursion
     (with-temp-buffer
       (let ((coding-system-for-read 'raw-text))
-	(insert-file-contents file nil 1 3001))
+	(insert-file-contents file nil 0 3000))
       (goto-char (point-min))
       (or (and (looking-at
 		"^[^\n]*-\\*-[^\n]*coding: \\([^ \t\n;]+\\)[^\n]*-\\*-")