Skip to content

Commit aec7de4

Browse files
committed
Merge branch 'so/cvsserver-update'
* so/cvsserver-update: cvsserver: make the output of 'update' more compatible with cvs.
2 parents 693f2b1 + 8e4c4e7 commit aec7de4

File tree

1 file changed

+16
-0
lines changed

1 file changed

+16
-0
lines changed

git-cvsserver.perl

Lines changed: 16 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -981,13 +981,29 @@ sub req_update
981981

982982
#$log->debug("update state : " . Dumper($state));
983983

984+
my $last_dirname = "///";
985+
984986
# foreach file specified on the command line ...
985987
foreach my $filename ( @{$state->{args}} )
986988
{
987989
$filename = filecleanup($filename);
988990

989991
$log->debug("Processing file $filename");
990992

993+
unless ( $state->{globaloptions}{-Q} || $state->{globaloptions}{-q} )
994+
{
995+
my $cur_dirname = dirname($filename);
996+
if ( $cur_dirname ne $last_dirname )
997+
{
998+
$last_dirname = $cur_dirname;
999+
if ( $cur_dirname eq "" )
1000+
{
1001+
$cur_dirname = ".";
1002+
}
1003+
print "E cvs update: Updating $cur_dirname\n";
1004+
}
1005+
}
1006+
9911007
# if we have a -C we should pretend we never saw modified stuff
9921008
if ( exists ( $state->{opt}{C} ) )
9931009
{

0 commit comments

Comments
 (0)