X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/12422e98901cef2774b15ec0e6468e88d4d0a6c6..7a1e12675ec5f1ea605d4de06a0b82079073fb20:/IkiWiki/Rcs/svn.pm

diff --git a/IkiWiki/Rcs/svn.pm b/IkiWiki/Rcs/svn.pm
index b45b69197..61c6409a7 100644
--- a/IkiWiki/Rcs/svn.pm
+++ b/IkiWiki/Rcs/svn.pm
@@ -126,7 +126,7 @@ sub rcs_recentchanges ($) { #{{{
 				$diffurl=~s/\[\[r1\]\]/$rev - 1/eg;
 				$diffurl=~s/\[\[r2\]\]/$rev/g;
 				push @pages, {
-					link => htmllink("", pagename($file), 1),
+					link => htmllink("", "", pagename($file), 1),
 					diffurl => $diffurl,
 				} if length $file;
 			}
@@ -145,7 +145,7 @@ sub rcs_recentchanges ($) { #{{{
 				}
 				
 				push @ret, { rev => $rev,
-					user => htmllink("", $user, 1),
+					user => htmllink("", "", $user, 1),
 					committype => $committype,
 					when => $when, message => [@message],
 					pages => [@pages],
@@ -227,32 +227,31 @@ sub rcs_notify () { #{{{
 	}
 } #}}}
 
-sub rcs_getctime () { #{{{
+sub rcs_getctime ($) { #{{{
+	my $file=shift;
 	eval q{use Date::Parse};
-	foreach my $page (keys %pagectime) {
-		my $file="$config{srcdir}/$pagesources{$page}";
-		next unless -e $file;
-		my $child = open(SVNLOG, "-|");
-		if (! $child) {
-			exec("svn", "log", $file) || error("svn log $file failed to run");
-		}
+		
+	my $child = open(SVNLOG, "-|");
+	if (! $child) {
+		exec("svn", "log", $file) || error("svn log $file failed to run");
+	}
 
-		my $date;
-		while (<SVNLOG>) {
-			if (/$svn_log_infoline/) {
-				$date=$3;
-		    	}
-		}
-		close SVNLOG || warn "svn log $file exited $?";
+	my $date;
+	while (<SVNLOG>) {
+		if (/$svn_log_infoline/) {
+			$date=$3;
+	    	}
+	}
+	close SVNLOG || warn "svn log $file exited $?";
 
-		if (! defined $date) {
-			warn "failed to parse svn log for $file\n";
-			next;
-		}
-		
-		$pagectime{$page}=$date=str2time($date);
-		debug("found ctime ".localtime($date)." for $page");
+	if (! defined $date) {
+		warn "failed to parse svn log for $file\n";
+		return 0;
 	}
+		
+	$date=str2time($date);
+	debug("found ctime ".localtime($date)." for $file");
+	return $date;
 } #}}}
 
 1