Handle uppercase env override

CSSH_* and cssh_*
duncs · Apr 1, 2021 · 18cc078 · 18cc078
1 parent 0e2b3ef
commit 18cc078
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/lib/App/ClusterSSH/Config.pm b/lib/App/ClusterSSH/Config.pm
@@ -339,6 +339,9 @@ sub load_configs {
     #  eg: terminal_size => cssh_terminal_size
     foreach my $config_key ( sort( keys(%default_config) ) ) {
         my $env_config_key = "cssh_".$config_key;
+        if ( exists $ENV{uc($env_config_key)}) {
+            $env_config_key = uc($env_config_key);
+        }
         if ( exists $ENV{$config_key} ) {
             $self->{$config_key} = $ENV{$config_key};
         }