trace rationalisation plus perltidy again
This commit is contained in:
Sitaram Chamarty 2012-03-17 07:40:17 +05:30
parent 89a1857d56
commit 9650d2fb3f
4 changed files with 9 additions and 4 deletions

View file

@ -126,6 +126,7 @@ sub git_config {
# and the final map does this: # and the final map does this:
# 'foo.bar'=>'repo' , 'foodbar'=>'repoD' # 'foo.bar'=>'repo' , 'foodbar'=>'repoD'
trace( 3, map { ( "$_" => "-> $ret{$_}" ) } ( sort keys %ret ) );
return \%ret; return \%ret;
} }
@ -165,7 +166,7 @@ sub load_1 {
trace( 3, $repo ); trace( 3, $repo );
if ( repo_missing($repo) ) { if ( repo_missing($repo) ) {
trace( 3, "repo '$repo' missing" ); trace( 2, "repo '$repo' missing" );
return; return;
} }
_chdir("$rc{GL_REPO_BASE}/$repo.git"); _chdir("$rc{GL_REPO_BASE}/$repo.git");
@ -237,6 +238,7 @@ sub memberships {
my $type = shift; my $type = shift;
my $item = shift; my $item = shift;
my $item2 = ''; my $item2 = '';
trace( 3, $type, $item );
my @ret = ( $item, '@all' ); my @ret = ( $item, '@all' );
@ -263,6 +265,7 @@ sub memberships {
} }
@ret = @{ sort_u( \@ret ) }; @ret = @{ sort_u( \@ret ) };
trace( 3, sort @ret );
return @ret; return @ret;
} }

View file

@ -123,5 +123,7 @@ sub run_all {
_system( $sfp, @ARGV ); # they better all return with 0 exit codes! _system( $sfp, @ARGV ); # they better all return with 0 exit codes!
} }
} }
return;
} }
trace( 2, "'$rc_section' not found in rc" );
} }