diff --git a/ChangeLog b/ChangeLog index 3f21815a90..0209297f7c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +Thu Jun 16 15:41:32 2005 NAKAMURA Usaku + + * ruby.c (load_file): '!' is already read. reported by gotoyuzo. + Thu Jun 16 15:09:38 2005 Hirokazu Yamamoto * ext/tk/tcltklib.c (ip_rb_threadVwaitCommand): Tcl_Release was missing. diff --git a/ruby.c b/ruby.c index f3888c8ae8..81e4b20b63 100644 --- a/ruby.c +++ b/ruby.c @@ -931,7 +931,7 @@ load_file(fname, script) char *path; char *pend = RSTRING(line)->ptr + RSTRING(line)->len; - p = RSTRING(line)->ptr + 1; /* skip `#!' */ + p = RSTRING(line)->ptr; /* skip `#!' */ if (pend[-1] == '\n') pend--; /* chomp line */ if (pend[-1] == '\r') pend--; *pend = '\0';