Merge branch 'so/cvsserver-update'
* so/cvsserver-update: cvsserver: make the output of 'update' more compatible with cvs.
This commit is contained in:
commit
aec7de4bed
@ -981,6 +981,8 @@ sub req_update
|
|||||||
|
|
||||||
#$log->debug("update state : " . Dumper($state));
|
#$log->debug("update state : " . Dumper($state));
|
||||||
|
|
||||||
|
my $last_dirname = "///";
|
||||||
|
|
||||||
# foreach file specified on the command line ...
|
# foreach file specified on the command line ...
|
||||||
foreach my $filename ( @{$state->{args}} )
|
foreach my $filename ( @{$state->{args}} )
|
||||||
{
|
{
|
||||||
@ -988,6 +990,20 @@ sub req_update
|
|||||||
|
|
||||||
$log->debug("Processing file $filename");
|
$log->debug("Processing file $filename");
|
||||||
|
|
||||||
|
unless ( $state->{globaloptions}{-Q} || $state->{globaloptions}{-q} )
|
||||||
|
{
|
||||||
|
my $cur_dirname = dirname($filename);
|
||||||
|
if ( $cur_dirname ne $last_dirname )
|
||||||
|
{
|
||||||
|
$last_dirname = $cur_dirname;
|
||||||
|
if ( $cur_dirname eq "" )
|
||||||
|
{
|
||||||
|
$cur_dirname = ".";
|
||||||
|
}
|
||||||
|
print "E cvs update: Updating $cur_dirname\n";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
# if we have a -C we should pretend we never saw modified stuff
|
# if we have a -C we should pretend we never saw modified stuff
|
||||||
if ( exists ( $state->{opt}{C} ) )
|
if ( exists ( $state->{opt}{C} ) )
|
||||||
{
|
{
|
||||||
|
Loading…
x
Reference in New Issue
Block a user