--- trunk/svn-indexer.pl	2006/12/06 22:54:49	16
+++ trunk/svn-indexer.pl	2006/12/06 23:05:36	17
@@ -8,6 +8,8 @@
 
 use lib 'lib';
 
+my $repository = shift @ARGV || 'svn://svn.pliva.hr/strix';
+
 use SVN::Log;
 use Data::Dump qw/dump/;
 
@@ -26,17 +28,17 @@
 
 if ($last_rev) {
 	$start_rev = $last_rev->revision;
-	warn "Update from revision $start_rev to $end_rev\n";
+	warn "Index $repository rev $start_rev - $end_rev\n";
 }
 
 SVN::Log::retrieve({
-	repository => "svn://svn.pliva.hr/strix",
+	repository => $repository,
 	start => $start_rev,
 	end => $end_rev,
 	callback => sub {
 		my ($paths,$revision,$author,$date,$message) = @_;
 
-		return if ($revision <= $last_rev->revision);
+		return if ($last_rev && $revision <= $last_rev->revision);
 
 		$author ||= 'anonymous';