diff options
author | Richard M. Stallman <rms@gnu.org> | 2003-03-14 23:05:10 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2003-03-14 23:05:10 +0000 |
commit | 225c7a073290d64f90a5cd483697a03ce289ae1b (patch) | |
tree | 2bc749a5cb4793099f25a2d28e9706ad565dbadd /src/lread.c | |
parent | 194600a8fa08104045698f0a9be6d6c3fe8b8f7e (diff) | |
download | emacs-225c7a073290d64f90a5cd483697a03ce289ae1b.tar.gz |
(read1): After #!, exit loop on eof.
Diffstat (limited to 'src/lread.c')
-rw-r--r-- | src/lread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index 70f0a3f2f9b..dfbbfeaad1e 100644 --- a/src/lread.c +++ b/src/lread.c @@ -2127,7 +2127,7 @@ read1 (readcharfun, pch, first_in_list) { /* #! appears at the beginning of an executable file. Skip the first line. */ - while (c != '\n') + while (c != '\n' && c >= 0) c = READCHAR; goto retry; } |