Fix oops in last commit

2016-04-25 12:24:05 -05:00
parent de38b80795
commit af07e0fd51
1 changed files with 2 additions and 1 deletions
--- a/src/ca/client/perl/perlConfig.pl
+++ b/src/ca/client/perl/perlConfig.pl
@@ -6,7 +6,8 @@
 use strict;
 use Config;

-my $val = $Config{shift};
+my $arg = shift;
+my $val = $Config{$arg};

 $val =~ s{\\}{/}go
    if $^O eq 'MSWin32';