Permalink
Browse files

simplified the repository class merge

  • Loading branch information...
1 parent fb698e7 commit ac79862ec3252c4f379a620c5a35aa67afe1b4cd @jberger jberger committed Mar 8, 2012
Showing with 2 additions and 4 deletions.
  1. +2 −4 lib/Alien/Base/ModuleBuild.pm
@@ -103,10 +103,8 @@ sub new {
my $cleanup_install_dir = 0;
# merge default and user-defined repository classes
- foreach my $protocol (keys %default_repository_class) {
- next if defined $args{alien_repository_class}{$protocol};
- $args{alien_repository_class}{$protocol} = $default_repository_class{$protocol};
- }
+ $args{alien_repository_class}{$_} ||= $default_repository_class{$_}
+ for keys %default_repository_class;
# initialize M::B property share_dir
if (! defined $args{share_dir}) {

0 comments on commit ac79862

Please sign in to comment.