summaryrefslogtreecommitdiffstats
path: root/WebKitTools/Scripts/do-file-rename
diff options
context:
space:
mode:
Diffstat (limited to 'WebKitTools/Scripts/do-file-rename')
-rwxr-xr-xWebKitTools/Scripts/do-file-rename11
1 files changed, 8 insertions, 3 deletions
diff --git a/WebKitTools/Scripts/do-file-rename b/WebKitTools/Scripts/do-file-rename
index 23a460c..ac5099e 100755
--- a/WebKitTools/Scripts/do-file-rename
+++ b/WebKitTools/Scripts/do-file-rename
@@ -1,6 +1,6 @@
#!/usr/bin/perl -w
-# Copyright (C) 2006 Apple Computer, Inc. All rights reserved.
+# Copyright (C) 2006, 2008 Apple Inc. All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
@@ -42,7 +42,10 @@ my %words;
# find all files we want to process
my @paths;
+find(\&wanted, "JavaScriptCore");
+find(\&wanted, "JavaScriptGlue");
find(\&wanted, "WebCore");
+find(\&wanted, "WebKit");
sub wanted
{
@@ -65,7 +68,9 @@ sub wanted
}
my %renames = (
- "xxx.mm" => "yyy.mm",
+);
+
+my %renamesContemplatedForTheFuture = (
);
# rename files
@@ -99,7 +104,7 @@ for my $file (sort @paths) {
my $newContents = $contents;
for my $from (keys %renames) {
- $newContents =~ s/\b\Q$from\E(?!["\w])/$renames{$from}/g; # this " unconfuses Xcode syntax highlighting
+ $newContents =~ s/\b\Q$from\E(?!\w)/$renames{$from}/g; # this " unconfuses Xcode syntax highlighting
}
if ($newContents ne $contents) {