[PATCH v2 3/7] cvsserver: Do not include status output for subdirectories if -l is passed

From: Damien Diederen <dash@foobox.net>
Date: Mar 27, 2008, 22:17 UTC
Message-ID: <e9090852dc2f6e0f9aae5f7418b18be24374a4d9.1206654905.git.dash@foobox.net>
In-Reply-To: <cover.1206393086.git.dash@foobox.net>

This effectively implements the -l switch by pruning the entries whose filenames contain a path separator. It was previously ignored.

Without this, TkCVS includes strange "ghost" entries in its directory listings.

Signed-off-by: Damien Diederen <dash@foobox.net>
---
 git-cvsserver.perl |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/git-cvsserver.perl b/git-cvsserver.perl
index 444ec0d..89a4dac 100755
--- a/git-cvsserver.perl
+++ b/git-cvsserver.perl
@@ -1428,6 +1428,8 @@ sub req_status
     {
         $filename = filecleanup($filename);
 
+        next if exists($state->{opt}{l}) && index($filename, '/', length($state->{prependdir})) >= 0;
+
         my $meta = $updater->getmeta($filename);
         my $oldmeta = $meta;

-- 
1.5.5.rc1.19.gfe7681