Replace <> with <<>>

[novaboot.git] / novaboot

diff --git a/novaboot b/novaboot
index 7fa381605f054bbce477bf74207d9837f8ada11b..0e888816369aab168f88a85a561869dd0ff0c96a 100755 (executable)
--- 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;