diff options
author | Tom Giordano <tomgiordano83@gmail.com> | 2011-11-15 16:31:19 +1100 |
---|---|---|
committer | Ricardo Cerqueira <cyanogenmod@cerqueira.org> | 2012-11-21 15:26:06 +0000 |
commit | a815c626d7df7e24ba9e0df27c27735d4e069ffd (patch) | |
tree | 2fccf8cffd741deea81156e282e505c6d5693181 /Source/WebCore/make-hash-tools.pl | |
parent | f48fa4adc27def6277ddb81a531dfa4800838560 (diff) | |
download | external_webkit-a815c626d7df7e24ba9e0df27c27735d4e069ffd.zip external_webkit-a815c626d7df7e24ba9e0df27c27735d4e069ffd.tar.gz external_webkit-a815c626d7df7e24ba9e0df27c27735d4e069ffd.tar.bz2 |
webkit: fix for perl 5.14+
Change-Id: Id740fff1824d11fef21995d0c472f923e70b3a46
Diffstat (limited to 'Source/WebCore/make-hash-tools.pl')
-rw-r--r-- | Source/WebCore/make-hash-tools.pl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/Source/WebCore/make-hash-tools.pl b/Source/WebCore/make-hash-tools.pl index 37639eb..629af85 100644 --- a/Source/WebCore/make-hash-tools.pl +++ b/Source/WebCore/make-hash-tools.pl @@ -20,7 +20,7 @@ # Boston, MA 02110-1301, USA. use strict; -use Switch; +use feature qw{ switch }; use File::Basename; my $outdir = $ARGV[0]; @@ -28,9 +28,9 @@ shift; my $option = basename($ARGV[0],".gperf"); -switch ($option) { +given ($option) { -case "DocTypeStrings" { +when ("DocTypeStrings") { my $docTypeStringsGenerated = "$outdir/DocTypeStrings.cpp"; my $docTypeStringsGperf = $ARGV[0]; @@ -38,9 +38,9 @@ case "DocTypeStrings" { system("gperf --key-positions=\"*\" -s 2 $docTypeStringsGperf > $docTypeStringsGenerated") == 0 || die "calling gperf failed: $?"; -} # case "DocTypeStrings" +} # when "DocTypeStrings" -case "ColorData" { +when ("ColorData") { my $colorDataGenerated = "$outdir/ColorData.cpp"; my $colorDataGperf = $ARGV[0]; @@ -48,6 +48,6 @@ case "ColorData" { system("gperf --key-positions=\"*\" -D -s 2 $colorDataGperf > $colorDataGenerated") == 0 || die "calling gperf failed: $?"; -} # case "ColorData" +} # when "ColorData" -} # switch ($option) +} # given ($option) |