summaryrefslogtreecommitdiffstats
path: root/kcontrol/keys/convertShortcuts.pl
diff options
context:
space:
mode:
authortoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
committertoma <toma@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2009-11-25 17:56:58 +0000
commit4aed2c8219774f5d797760606b8489a92ddc5163 (patch)
tree3f8c130f7d269626bf6a9447407ef6c35954426a /kcontrol/keys/convertShortcuts.pl
downloadtdebase-4aed2c8219774f5d797760606b8489a92ddc5163.tar.gz
tdebase-4aed2c8219774f5d797760606b8489a92ddc5163.zip
Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.
BUG:215923 git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdebase@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'kcontrol/keys/convertShortcuts.pl')
-rwxr-xr-xkcontrol/keys/convertShortcuts.pl58
1 files changed, 58 insertions, 0 deletions
diff --git a/kcontrol/keys/convertShortcuts.pl b/kcontrol/keys/convertShortcuts.pl
new file mode 100755
index 000000000..9dc216ac6
--- /dev/null
+++ b/kcontrol/keys/convertShortcuts.pl
@@ -0,0 +1,58 @@
+#!/usr/bin/perl
+$keys=0;
+foreach (<>) {
+ if(/^\[.*\]/) { $keys=0; }
+ if($keys==1) {
+ ($oldkey) = ($_ =~ /([^=]*)=.*/);
+ s/^Execute Command/Run Command/;
+ s/^Execute command/Run Command/;
+ s/^Lock screen/Lock Session/;
+ s/^Lock Screen/Lock Session/;
+ s/^Mouse emulation/Mouse Emulation/;
+ s/^Next keyboard layout/Switch to Next Keyboard Layout/;
+ s/Switch To Next Keyboard Layout/Switch to Next Keyboard Layout/;
+ s/^Screenshot of desktop/Desktop Screenshot/;
+ s/^Pop-up window operations menu/Window Operations Menu/;
+ s/^toggle-clipboard-actions/Enable\/Disable Clipboard Actions/;
+ s/^Screenshot of active window/Window Screenshot/;
+ s/^Show taskmanager/Show Taskmanager/;
+ s/^Show window list/Show Window List/;
+ s/^show-klipper-popupmenu/Show Klipper Popup-Menu/;
+ s/^Switch desktop left/Switch One Desktop to the Left/;
+ s/^Switch desktop right/Switch One Desktop to the Right/;
+ s/^Switch desktop down/Switch One Desktop Down/;
+ s/^Switch desktop up/Switch One Desktop Up/;
+ s/^Switch to desktop /Switch to Desktop /;
+ s/^Switch desktop next/Switch to Next Desktop/;
+ s/^Switch desktop previous/Switch to Previous Desktop/;
+ s/^Toggle Show Desktop/Toggle Showing Desktop/;
+ s/^Toggle raise and lower/Toggle Window Raise\/Lower/;
+ s/^Walk back through desktop list/Walk Through Desktop List \(Reverse\)/;
+ s/^Walk back through desktops/Walk Through Desktops \(Reverse\)/;
+ s/^Walk back through windows/Walk Through Windows \(Reverse\)/;
+ s/^Walk through desktop list/Walk Through Desktop List/;
+ s/^Walk through desktops/Walk Through Desktops/;
+ s/^Walk through windows/Walk Through Windows/;
+ s/^Window close/Window Close/;
+ s/^Window iconify/Window Iconify/;
+ s/^Window lower/Window Lower/;
+ s/^Window maximize/Window Maximize/;
+ s/^Window maximize horizontal/Window Maximize Horizontal/;
+ s/^Window maximize vertical/Window Maximize Vertical/;
+ s/^Window move/Window Move/;
+ s/^Window raise/Window Raise/;
+ s/^Window resize/Window Resize/;
+ s/^Window shade/Window Shade/;
+ s/^Window to Desktop /Window to Desktop /;
+ s/^Window to next desktop/Window to Next Desktop/;
+ s/^Window to previous desktop/Window to Previous Desktop/;
+ s/^repeat-last-klipper-action/Show Klipper Popup-Menu/;
+ ($newkey) = ($_ =~ /([^=]*)=.*/);
+ if ($oldkey ne $newkey) {
+ print "# DELETE " . $oldkey . "\n";
+ print $_
+ }
+ }
+ if(/\[Global Keys\]/) { $keys=1; print $_; }
+ if(/\[Global Shortcuts\]/) { $keys=1; print $_; }
+}