package IkiWiki;
-sub bazaar_log ($) { #{{{
+sub bzr_log ($) { #{{{
my $out = shift;
my @infos = ();
my $key = undef;
error($@) if $@;
my @ret;
- foreach my $info (bazaar_log($out)) {
+ foreach my $info (bzr_log($out)) {
my @pages = ();
my @message = ();
push @ret, {
rev => $info->{"revno"},
user => $user,
- committype => "bazaar",
+ committype => "bzr",
when => time - str2time($info->{"timestamp"}),
message => [@message],
pages => [@pages],
my @cmdline = ("bzr", "log", "--limit", '1', "$config{srcdir}/$file");
open (my $out, "@cmdline |");
- my @log = bazaar_log($out);
+ my @log = bzr_log($out);
if (length @log < 1) {
return 0;