summaryrefslogtreecommitdiff
path: root/IkiWiki
diff options
context:
space:
mode:
authorJoey Hess <joey@gnu.kitenet.net>2010-04-04 12:17:03 -0400
committerJoey Hess <joey@gnu.kitenet.net>2010-04-04 12:17:03 -0400
commitf206035a3a7ed0b37c082e80d6d1482983fa583b (patch)
tree13d350e4c059d5a8e99e279a4a40a9cb39184abb /IkiWiki
parent75afa94c36e199956014e108d7894007964c7348 (diff)
fix indentation & whitespace
Diffstat (limited to 'IkiWiki')
-rw-r--r--IkiWiki/Plugin/bzr.pm21
1 files changed, 11 insertions, 10 deletions
diff --git a/IkiWiki/Plugin/bzr.pm b/IkiWiki/Plugin/bzr.pm
index e813331b7..6e45c39e4 100644
--- a/IkiWiki/Plugin/bzr.pm
+++ b/IkiWiki/Plugin/bzr.pm
@@ -73,7 +73,7 @@ sub bzr_log ($) {
my @infos = ();
my $key = undef;
- my $hash = {};
+ my $hash = {};
while (<$out>) {
my $line = $_;
my ($value);
@@ -89,10 +89,10 @@ sub bzr_log ($) {
$$hash{$key} .= "$1\n";
}
elsif ($line eq "------------------------------------------------------------\n") {
- if (keys %$hash) {
- push (@infos, $hash);
- }
- $hash = {};
+ if (keys %$hash) {
+ push (@infos, $hash);
+ }
+ $hash = {};
$key = undef;
}
elsif ($line =~ /: /) {
@@ -100,11 +100,12 @@ sub bzr_log ($) {
if ($line =~ /^revno: (\d+)/) {
$key = "revno";
$value = $1;
- } else {
- ($key, $value) = split /: +/, $line, 2;
- }
+ }
+ else {
+ ($key, $value) = split /: +/, $line, 2;
+ }
$$hash{$key} = $value;
- }
+ }
}
close $out;
@@ -222,7 +223,7 @@ sub rcs_recentchanges ($) {
foreach my $info (bzr_log($out)) {
my @pages = ();
my @message = ();
-
+
foreach my $msgline (split(/\n/, $info->{message})) {
push @message, { line => $msgline };
}