mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-30 09:00:31 -08:00
Code Issues Projects Releases Wiki Activity

Comment

Browse source
This commit is contained in:
Glenn Morris 2012-09-28 00:45:18 -07:00
parent 757140ff9a
commit d2dd369457
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/lread.c
View file

@ -784,6 +784,8 @@ lisp_file_lexically_bound_p (Lisp_Object readcharfun)
while (ch != '\n' && ch != EOF)
ch = READCHAR;
if (ch == '\n') ch = READCHAR;
/* It is OK to leave the position after a #! line, since
that is what read1 does. */
}
if (ch != ';')