Fix runtime.pl warnings.

vectorgraphics · Feb 9, 2025 · 8df4826 · 8df4826
1 parent 71b86df
commit 8df4826
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/runtime.pl b/runtime.pl
@@ -302,9 +302,13 @@ sub c_params {
 push @header, "}\n\n";
 
 undef $/;
-open my $HEADER, "<", $outHeaderFile;
-my $orig_header = <$HEADER>;
-close $HEADER;
+my $orig_header = "";
+my $HEADER;
+if (-e $outHeaderFile) {
+    open $HEADER, "<", $outHeaderFile;
+    $orig_header = <$HEADER>;
+    close $HEADER;
+}
 
 my $new_header = join "", @header;
 if ($new_header ne $orig_header) {