X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FConfig.pm;h=cb30eda342c09a0704e9edfc5e1d762a5d7c12c8;hb=d1fb15bad755ce96c840a5b1fa37986353d41e1a;hp=c7007a76115ba5285b7408609333b8c88873ff02;hpb=1bb2d54aede40f8d702e08b2513fee5aa619629b;p=debbugs.git

diff --git a/Debbugs/Config.pm b/Debbugs/Config.pm
index c7007a7..cb30eda 100644
--- a/Debbugs/Config.pm
+++ b/Debbugs/Config.pm
@@ -1089,7 +1089,7 @@ sub read_config{
 	  die "Error in configuration file: $@" if $@;
 	  # Now what we do is check out the contents of %EXPORT_TAGS to see exactly which variables
 	  # we want to glob in from the configuration file
-	  for my $variable (@{$EXPORT_TAGS{globals}}) {
+	  for my $variable (map {$_ =~ /^(?:config|all)$/ ? () : @{$EXPORT_TAGS{$_}}} keys %EXPORT_TAGS) {
 	       my ($hash_name,$glob_name,$glob_type) = __convert_name($variable);
 	       my $var_glob = $cpt->varglob($glob_name);
 	       my $value; #= $cpt->reval("return $variable");