Преглед изворни кода

fix bug with tpsgi-config not getting the value

George Baugh пре 1 година
родитељ
комит
f8ded6e069
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      bin/tpsgi-config

+ 1 - 1
bin/tpsgi-config

@@ -21,7 +21,7 @@ sub main {
 
     GetOptionsFromArray(\@args, %def);
 
-    foreach my $param (keys(%options)) {
+    foreach my $param (keys(%def)) {
         next unless $options{$param};
         my @to_print;
         @to_print = ref $config{$param} eq 'ARRAY' ? @{$config{$param}}: $config{$param};