X-Git-Url: http://rtime.felk.cvut.cz/gitweb/novaboot.git/blobdiff_plain/6dcb21a0b297867324ee581a6a5306afbd965577..0a26fc0d0c474edbbc900261d85d9c60d0a8294d:/novaboot diff --git a/novaboot b/novaboot index 7fa3816..0e88881 100755 --- a/novaboot +++ b/novaboot @@ -357,7 +357,7 @@ my $EOF; my $last_fn = ''; my ($modules, $variables, $generated, $copy, $chainload, $continuation) = ([], {}, [], []); my $skip_reading = defined($on_opt) || defined($off_opt); -while (!$skip_reading && ($_ = <>)) { +while (!$skip_reading && ($_ = <<>>)) { if ($ARGV ne $last_fn) { # New script die "Missing EOF in $last_fn" if $file; die "Unfinished line in $last_fn" if $continuation;