diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-09-03 19:53:23 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-09-03 19:53:23 +0000 |
commit | 92065444d982a443d3862f9ce5094bd32faffb85 (patch) | |
tree | 5eb504ad535f880a1ddaad3c27224d31a2c24d5f /IkiWiki/Rcs/git.pm | |
parent | 22b414ddc0d0e35ad94c60c96a8ac2c8c5e267d5 (diff) | |
download | ikiwiki-92065444d982a443d3862f9ce5094bd32faffb85.tar ikiwiki-92065444d982a443d3862f9ce5094bd32faffb85.tar.gz |
* Simplify the data structure returned by rcs_recentchanges to avoid
each rcs plugin needing to form complex strings on its own.
Diffstat (limited to 'IkiWiki/Rcs/git.pm')
-rw-r--r-- | IkiWiki/Rcs/git.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/IkiWiki/Rcs/git.pm b/IkiWiki/Rcs/git.pm index 271c27af6..a156f0b4e 100644 --- a/IkiWiki/Rcs/git.pm +++ b/IkiWiki/Rcs/git.pm @@ -345,7 +345,6 @@ sub rcs_recentchanges ($) { #{{{ eval q{use CGI 'escapeHTML'}; eval q{use Date::Parse}; - eval q{use Time::Duration}; my ($sha1, $type, $when, $diffurl, $user, @pages, @message, @rets); INFO: foreach my $ci (git_commit_info('HEAD', $num)) { @@ -356,7 +355,7 @@ sub rcs_recentchanges ($) { #{{{ $sha1 = $ci->{'sha1'}; $type = "web"; - $when = concise(ago(time - $ci->{'author_epoch'})); + $when = time - $ci->{'author_epoch'}; foreach my $bit (@{ $ci->{'details'} }) { my $diffurl = $config{'diffurl'}; @@ -368,7 +367,7 @@ sub rcs_recentchanges ($) { #{{{ $diffurl =~ s/\[\[sha1_to\]\]/$bit->{'sha1_to'}/go; push @pages, { - link => htmllink("", "", pagename($file), 1), + page => pagename($file), diffurl => $diffurl, }, } @@ -386,7 +385,7 @@ sub rcs_recentchanges ($) { #{{{ push @rets, { rev => $sha1, - user => htmllink("", "", $user, 1), + user => $user, committype => $type, when => $when, message => [@message], |