Typo configpm

Mon, 4 Nov 2002; Rafael Garcia-Suarez <rgarciasuarez@free.fr>

p4raw-id: //depot/perl@18083

1 files changed, 1 insertions, 1 deletions

diff --git a/configpm b/configpm
index 7816c8d669..08e7099000 100755
--- a/configpm
+++ b/configpm
@@ -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 {