summaryrefslogtreecommitdiffstats
path: root/perl-install/common.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/common.pm')
-rw-r--r--perl-install/common.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm
index d680311b7..4c75bd91e 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -428,6 +428,7 @@ sub getVarsFromSh($) {
local *F; open F, $_[0] or return;
local $_;
while (<F>) {
+ s/#.*//; # remove comments
my ($v, $val, $val2) =
/^\s* # leading space
(\w+) = # variable