git.shiar.nl
/
sheet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
c45cd53
)
perl: newlines after list options
author
Mischa POSLAWSKY
<perl@shiar.org>
Sun, 25 Jan 2015 00:07:11 +0000
(
01:07
+0100)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Sun, 1 Feb 2015 17:34:13 +0000
(18:34 +0100)
HTML readability only.
perl.plp
patch
|
blob
|
history
diff --git
a/perl.plp
b/perl.plp
index 7b230383a50c813afb4394dd2647da5b4fd706f4..e0f6cd4b1b47cf10f2ea32ff97ef599626226213 100644
(file)
--- a/
perl.plp
+++ b/
perl.plp
@@
-26,8
+26,8
@@
for my $vernum (reverse sort keys %{$info}) {
my $verrow = $info->{$vernum};
print '<div class="section">'."\n";
printf '<h2>%vd <small>%s</small></h2><dl>'."\n", $vernum, $verrow->{release};
my $verrow = $info->{$vernum};
print '<div class="section">'."\n";
printf '<h2>%vd <small>%s</small></h2><dl>'."\n", $vernum, $verrow->{release};
- printf '<dt>%s<dd>%s', @{$_}, '<br/>' for @{ $verrow->{new} };
- printf '<dt>Unicode</dt><dd>v%s', $_ for $verrow->{unicode} || ();
+ printf '<dt>%s<dd>%s'
."\n"
, @{$_}, '<br/>' for @{ $verrow->{new} };
+ printf '<dt>Unicode</dt><dd>v%s'
."\n"
, $_ for $verrow->{unicode} || ();
print "</dl>\n";
print "</div>\n\n";
}
print "</dl>\n";
print "</div>\n\n";
}