Title: [90147] releases/WebKitGTK/webkit-1.4/Source/WebCore
Diff
Modified: releases/WebKitGTK/webkit-1.4/Source/WebCore/ChangeLog (90146 => 90147)
--- releases/WebKitGTK/webkit-1.4/Source/WebCore/ChangeLog 2011-06-30 19:25:16 UTC (rev 90146)
+++ releases/WebKitGTK/webkit-1.4/Source/WebCore/ChangeLog 2011-06-30 19:26:17 UTC (rev 90147)
@@ -1,3 +1,14 @@
+2011-06-30 Andras Becsi <[email protected]>
+
+ Reviewed by Csaba Osztrogonác.
+
+ make-hash-tools.pl: Perl 5.14 compatibility
+ https://bugs.webkit.org/show_bug.cgi?id=61890
+
+ No new tests needed.
+
+ * make-hash-tools.pl: Use if/elsif instead of switch/case.
+
2011-06-30 Martin Robinson <[email protected]>
Reviewed by Xan Lopez.
Modified: releases/WebKitGTK/webkit-1.4/Source/WebCore/make-hash-tools.pl (90146 => 90147)
--- releases/WebKitGTK/webkit-1.4/Source/WebCore/make-hash-tools.pl 2011-06-30 19:25:16 UTC (rev 90146)
+++ releases/WebKitGTK/webkit-1.4/Source/WebCore/make-hash-tools.pl 2011-06-30 19:26:17 UTC (rev 90147)
@@ -20,7 +20,6 @@
# Boston, MA 02110-1301, USA.
use strict;
-use Switch;
use File::Basename;
my $outdir = $ARGV[0];
@@ -28,26 +27,22 @@
my $option = basename($ARGV[0],".gperf");
-switch ($option) {
+if ($option eq "DocTypeStrings") {
-case "DocTypeStrings" {
-
my $docTypeStringsGenerated = "$outdir/DocTypeStrings.cpp";
my $docTypeStringsGperf = $ARGV[0];
shift;
system("gperf --key-positions=\"*\" -s 2 $docTypeStringsGperf > $docTypeStringsGenerated") == 0 || die "calling gperf failed: $?";
-} # case "DocTypeStrings"
+} elsif ($option eq "ColorData") {
-case "ColorData" {
-
my $colorDataGenerated = "$outdir/ColorData.cpp";
my $colorDataGperf = $ARGV[0];
shift;
system("gperf --key-positions=\"*\" -D -s 2 $colorDataGperf > $colorDataGenerated") == 0 || die "calling gperf failed: $?";
-} # case "ColorData"
-
-} # switch ($option)
+} else {
+ die "Unknown option.";
+}
_______________________________________________
webkit-changes mailing list
[email protected]
http://lists.webkit.org/mailman/listinfo.cgi/webkit-changes
