diff options
Diffstat (limited to 'embed.pl')
-rwxr-xr-x | embed.pl | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -28,7 +28,7 @@ sub readvars(\%$$) { or die "embed.pl: Can't open $file: $!\n"; while (<FILE>) { s/[ \t]*#.*//; # Delete comments. - if (/PERLVARI?\($pre(\w+)/) { + if (/PERLVARI?C?\($pre(\w+)/) { $$syms{$1} = 1; } } @@ -279,4 +279,4 @@ print EM <<'END'; END -close(EM);
\ No newline at end of file +close(EM); |