X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=configpm;h=b705997c08a6b784901a7febc7bf25acc287d7d7;hb=b3c0ec7c1220f243dffb147d13728e1cc44420cc;hp=7816c8d66959609315079ab119cd94ec633f16e1;hpb=a48f8c779b973cde21f91eb6230f57994f5c9ad9;p=p5sagit%2Fp5-mst-13.2.git diff --git a/configpm b/configpm index 7816c8d..b705997 100755 --- a/configpm +++ b/configpm @@ -118,7 +118,7 @@ sub fetch_string { my $quote_type = "'"; my $marker = "$key="; - # Check for the common case, ' delimeted + # Check for the common case, ' delimited my $start = index($Config_SH, "\n$marker$quote_type"); # If that failed, check for " delimited if ($start == -1) { @@ -326,7 +326,7 @@ sub config_sh { sub config_re { my $re = shift; - return map { chomp; $_ } grep /^$re=/, split /^/, $config_sh; + return map { chomp; $_ } grep /^$re=/, split /^/, $Config_SH; } sub config_vars {