--- trunk/svn-indexer.pl	2006/12/05 10:17:28	1
+++ trunk/svn-indexer.pl	2006/12/05 23:14:16	11
@@ -19,6 +19,16 @@
 
 my $system_user = SVNBrowser::CurrentUser->superuser;
 
+my $rev_col = SVNBrowser::Model::RevisionCollection->new(current_user => $system_user);
+$rev_col->unlimit;
+$rev_col->order_by({ column => 'revision', order => 'DES' });
+my $last_rev = $rev_col->first;
+
+if ($last_rev) {
+	$start_rev = $last_rev->revision;
+	warn "Update from revision $start_rev to $end_rev\n";
+}
+
 SVN::Log::retrieve({
 	repository => "svn://svn.pliva.hr/strix",
 	start => $start_rev,
@@ -26,6 +36,8 @@
 	callback => sub {
 		my ($paths,$revision,$author,$date,$message) = @_;
 
+		return if ($revision <= $last_rev->revision);
+
 		$author ||= 'anonymous';
 
 		my $r = SVNBrowser::Model::Revision->new(current_user => $system_user);