From 526b29c178083d7f09ff62a2dd96154dc0cb395c Mon Sep 17 00:00:00 2001
From: Stefan Metzmacher <metze@samba.org>
Date: Thu, 8 Nov 2007 14:31:10 -0600
Subject: [PATCH] be less verbose and return if nothing todo

metze
---
 samba4-sync.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/samba4-sync.pl b/samba4-sync.pl
index b77618c..8872ef7 100755
--- a/samba4-sync.pl
+++ b/samba4-sync.pl
@@ -125,7 +125,7 @@ sub strip_svn_properties($)
 	my $chunks = undef;
 	foreach my $l (@in) {
 		if ($l =~ /^Index: ([\w\.\_\-\/]+)/) {
-			print "content: $1\n";
+			#print "content: $1\n";
 
 			$chunk = undef;
 			$chunk->{type} = "content";
@@ -133,7 +133,7 @@ sub strip_svn_properties($)
 			confess "$1 content exists" if defined($chunks->{$1}) and defined($chunks->{$1}->{content});
 			$chunks->{$1}->{content} = $chunk;
 		} elsif ($l =~ /^Property changes on: ([\w\.\_\-\/]+)/) {
-			print "properties(".is_dir($1)."): $1\n";
+			#print "properties(".is_dir($1)."): $1\n";
 
 			$chunk = undef;
 			$chunk->{type} = "property";
@@ -177,6 +177,7 @@ sub get_new_svn_revs($$)
 {
 	my ($lastrev, $currev) = @_;
 	my $nextrev = $lastrev + 1;
+	return undef if $nextrev >= $currev;
 	my $logcmd = "LANG=C svn log --non-interactive -r $nextrev:$currev $SVN_PATH";
 	my $log = `$logcmd` || confess "$logcmd: failed";
 	my $revs = undef;
-- 
2.34.1