return if !$name;
$manager_cache{$name} ||= do {
- die "'$name' doesn't look like a default manager." unless $name =~ /^\w+$/a;
+ die "'$name' doesn't look like a default manager." unless $name =~ /^\w+$/;
my $package = 'SL::DefaultManager::' . camelify($name);
}
}
-sub country_modes {
- my ($self) = @_;
- return (
- 'CH' => 'Switzerland',
- 'DE' => 'Germany',
- )
-}
-
sub AUTOLOAD {
our $AUTOLOAD;