diff options
| author | Joey Hess <joey@gnu.kitenet.net> | 2009-08-12 12:43:57 -0400 |
|---|---|---|
| committer | Joey Hess <joey@gnu.kitenet.net> | 2009-08-12 12:43:57 -0400 |
| commit | 906c8f6e5837a1de5e032d40eba0856b9918bbee (patch) | |
| tree | 2dbb784a20ca9b2d06708ccd140c2de8881b68a0 /IkiWiki/Plugin/monotone.pm | |
| parent | 04014e47755312bb500b28fc10153dd38eeb7131 (diff) | |
| download | ikiwiki-906c8f6e5837a1de5e032d40eba0856b9918bbee.tar ikiwiki-906c8f6e5837a1de5e032d40eba0856b9918bbee.tar.gz | |
use a more idiomatic foreach my
Diffstat (limited to 'IkiWiki/Plugin/monotone.pm')
| -rw-r--r-- | IkiWiki/Plugin/monotone.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/IkiWiki/Plugin/monotone.pm b/IkiWiki/Plugin/monotone.pm index bdb564a71..05c5a514d 100644 --- a/IkiWiki/Plugin/monotone.pm +++ b/IkiWiki/Plugin/monotone.pm @@ -575,13 +575,12 @@ sub rcs_recentchanges ($) { } my @changed_files = get_changed_files($automator, $rev); - my $file; my ($out, $err) = $automator->call("parents", $rev); my @parents = ($out =~ m/^($sha1_pattern)$/); my $parent = $parents[0]; - foreach $file (@changed_files) { + foreach my $file (@changed_files) { next unless length $file; if (defined $config{diffurl} and (@parents == 1)) { |