# HG changeset patch # User Richard M. Stallman # Date 1173647811 0 # Node ID f4a10797c3ce6f95f234fb4ce5cfd64d0edf3bfd # Parent 63e4cb93803ae0f98c4ba0b20b9c05e0a20be7d1 (type-break-get-previous-count): Repeat previous change here. diff -r 63e4cb93803a -r f4a10797c3ce lisp/type-break.el --- 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)))