From: Nick J. <nje...@us...> - 2003-04-23 20:36:40
|
Update of /cvsroot/sandweb/sandweb/lib/SandWeb/Repository In directory sc8-pr-cvs1:/tmp/cvs-serv28951/lib/SandWeb/Repository Modified Files: cvs.pm Log Message: Fixed code formatting (tabs) and a minor syntax error. Index: cvs.pm =================================================================== RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Repository/cvs.pm,v retrieving revision 1.46 retrieving revision 1.47 diff -U2 -r1.46 -r1.47 --- cvs.pm 1 Apr 2003 02:46:27 -0000 1.46 +++ cvs.pm 23 Apr 2003 20:36:34 -0000 1.47 @@ -259,8 +259,9 @@ $log->debug("File: $file"); } - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -399,8 +400,8 @@ if ($type == "text") { push @param, " -kkv -MMERGE" }; - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -470,5 +471,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $date = $params{'type'}; my $rev = $params{'rev'}; @@ -486,8 +487,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -576,5 +577,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $rev = $params{'rev'}; my $recurse = $params{'recurse'}; @@ -593,8 +594,8 @@ } - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -675,5 +676,5 @@ my $log = $self->get_log(); my $users_dir = $self->get_users_dir(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $recurse = $params{'recurse'}; my $message = $params{'message'}; @@ -710,10 +711,10 @@ $log->debug("File: " . $file_obj->get_filename() ); } - %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", + %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", 'file_obj' => $file_obj, - ); - }; + ); + } if ($output) { @@ -795,5 +796,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $date = $params{'date'}; my $rev = $params{'rev'}; @@ -897,5 +898,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $recurse = $params{'recurse'}; my $action = $params{'action'}; @@ -911,8 +912,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -977,5 +978,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $recurse = $params{'recurse'}; my $file = $params{'file'}; @@ -989,8 +990,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -1157,5 +1158,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $file = $params{'file'}; @@ -1166,8 +1167,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -1291,5 +1292,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $file = $params{'file'}; @@ -1300,8 +1301,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -1379,5 +1380,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $file = $params{'file'}; @@ -1388,8 +1389,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -1451,5 +1452,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $password = $params{'password'}; @@ -1467,8 +1468,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -1533,8 +1534,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -1715,5 +1716,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $delete = $params{'delete'}; my $file = $params{'file'}; @@ -1727,8 +1728,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -1793,5 +1794,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $remove = $params{'remove'}; my $recurse = $params{'recurse'}; @@ -1810,8 +1811,8 @@ } - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -2094,5 +2095,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $recurse = $params{'recurse'}; my $delete = $params{'delete'}; @@ -2199,5 +2200,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $recurse = $params{'recurse'}; my $file = $params{'file'}; @@ -2211,8 +2212,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -2298,5 +2299,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $recurse = $params{'recurse'}; my $reset = $params{'reset'}; @@ -2332,8 +2333,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); if ($return{'error'}) { @@ -2444,5 +2445,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $set = $params{'set'}; my $notify = $params{'notify'}; @@ -2460,8 +2461,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -2525,5 +2526,5 @@ my $log = $self->get_log(); - my %params = @{ $args{'params'}[0] }; + my %params = @{ $args{'params'}[0] }; my $recurse = $params{'recurse'}; my $file = $params{'file'}; @@ -2537,8 +2538,8 @@ $log->debug("File: $file"); - my %return = $self->shell( - 'param' => join('', @param), - 'file' => "$file", - ); + my %return = $self->shell( + 'param' => join('', @param), + 'file' => "$file", + ); return %return; @@ -2550,17 +2551,17 @@ my $root = $self->get_root() || ''; - my $sandbox = $self->get_sandbox() || ''; - my $users_dir = $self->get_users_dir() || ''; - my $connection = $self->get_connection() || ''; - my $server = $self->get_server() || ''; - my $ssh_bin = $self->get_ssh_bin() || ''; - my $cvs_bin = $self->get_cvs_bin() || ''; + my $sandbox = $self->get_sandbox() || ''; + my $users_dir = $self->get_users_dir() || ''; + my $connection = $self->get_connection() || ''; + my $server = $self->get_server() || ''; + my $ssh_bin = $self->get_ssh_bin() || ''; + my $cvs_bin = $self->get_cvs_bin() || ''; my $bindir = $self->get_bindir() || ''; - my $vcs_username = $self->get_vcs_username() || ''; - my $vcs_password = $self->get_vcs_password() || ''; - my $system_username = $self->get_system_username() || ''; - my $system_password = $self->get_system_password() || ''; - my $system_timeout = $self->get_system_timeout() || ''; - my $log = $self->get_log() || ''; + my $vcs_username = $self->get_vcs_username() || ''; + my $vcs_password = $self->get_vcs_password() || ''; + my $system_username = $self->get_system_username() || ''; + my $system_password = $self->get_system_password() || ''; + my $system_timeout = $self->get_system_timeout() || ''; + my $log = $self->get_log() || ''; my $vcs = ''; |