changeset 76464:f4a10797c3ce

(type-break-get-previous-count): Repeat previous change here.
author Richard M. Stallman <rms@gnu.org>
date Sun, 11 Mar 2007 21:16:51 +0000
parents 63e4cb93803a
children 6582d03c2a6e
files lisp/type-break.el
diffstat 1 files changed, 7 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/type-break.el	Sun Mar 11 21:16:09 2007 +0000
+++ b/lisp/type-break.el	Sun Mar 11 21:16:51 2007 +0000
@@ -579,10 +579,13 @@
               (setq file
                     (with-current-buffer
                         (find-file-noselect file 'nowarn)
-                      (save-excursion
-                        (goto-char (point-min))
-                        (forward-line 1)
-                        (read (current-buffer)))))))
+                    (condition-case nil
+                        (save-excursion
+                          (goto-char (point-min))
+                          (forward-line 1)
+                          (read (current-buffer)))
+                      (end-of-file
+                       (error "End of file in `%s'" file)))))))
         file
       0)))