perl 4.0 patch 7: patch #4, continued

[perl5.git] / h2pl / mkvars

diff --git a/h2pl/mkvars b/h2pl/mkvars
index c6b5ad1..ffb0f0b 100644 (file)
--- a/h2pl/mkvars
+++ b/h2pl/mkvars
@@ -19,7 +19,7 @@ foreach $include (@ARGV) {
            $val = eval "&$var;";
            if ($@) {
                warn "$@: $_";
-               print <<EOT
+               print <<EOT;
 warn "\$$var isn't correctly set" if defined \$_main{'$var'};
 EOT
                next;