This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
ff485b9
)
mktables: Initialize variable
author
Karl Williamson
<public@khwilliamson.com>
Sun, 21 Aug 2011 18:45:00 +0000
(12:45 -0600)
committer
Karl Williamson
<public@khwilliamson.com>
Tue, 8 Nov 2011 15:09:09 +0000
(08:09 -0700)
It is unlikely but possible that this variable will not be set by the
code below, and will end up being interpolated later undefined.
lib/unicore/mktables
patch
|
blob
|
blame
|
history
diff --git
a/lib/unicore/mktables
b/lib/unicore/mktables
index
0873b8e
..
3e2a948
100644
(file)
--- a/
lib/unicore/mktables
+++ b/
lib/unicore/mktables
@@
-13132,7
+13132,7
@@
END
. $formatted_properties;
# Generate pod documentation lines for the tables that match nothing
- my $zero_matches;
+ my $zero_matches
= ""
;
if (@zero_match_tables) {
@zero_match_tables = uniques(@zero_match_tables);
$zero_matches = join "\n\n",