← Back to branch summary

~ubuntu-branches/ubuntu/utopic/kde-workspace/utopic-proposed

« back to all changes in this revision

Viewing changes to kcontrol/keys/convertShortcuts.pl

  • Committer: Bazaar Package Importer
  • Author(s): Michał Zając
  • Date: 2011-07-09 08:31:15 UTC
  • Revision ID: james.westby@ubuntu.com-20110709083115-ohyxn6z93mily9fc
Tags: upstream-4.6.90
Import upstream version 4.6.90

Show diffs side-by-side

added added

removed removed

Lines of Context:
kcontrol/keys/convertShortcuts.pl
 
1
#!/usr/bin/perl
 
2
$keys=0;
 
3
foreach (<>) {
 
4
    if(/^\[.*\]/) { $keys=0; }
 
5
    if($keys==1) {
 
6
        ($oldkey) = ($_ =~ /([^=]*)=.*/);
 
7
        s/^Execute Command/Run Command/;
 
8
        s/^Execute command/Run Command/;
 
9
        s/^Lock screen/Lock Session/;
 
10
        s/^Lock Screen/Lock Session/;
 
11
        s/^Mouse emulation/Mouse Emulation/;
 
12
        s/^Next keyboard layout/Switch to Next Keyboard Layout/;
 
13
        s/Switch To Next Keyboard Layout/Switch to Next Keyboard Layout/;
 
14
        s/^Screenshot of desktop/Desktop Screenshot/;
 
15
        s/^Pop-up window operations menu/Window Operations Menu/;
 
16
        s/^toggle-clipboard-actions/Enable\/Disable Clipboard Actions/;
 
17
        s/^Screenshot of active window/Window Screenshot/;
 
18
        s/^Show taskmanager/Show Taskmanager/;
 
19
        s/^Show window list/Show Window List/;
 
20
        s/^show-klipper-popupmenu/Show Klipper Popup-Menu/;
 
21
        s/^Switch desktop left/Switch One Desktop to the Left/;
 
22
        s/^Switch desktop right/Switch One Desktop to the Right/;
 
23
        s/^Switch desktop down/Switch One Desktop Down/;
 
24
        s/^Switch desktop up/Switch One Desktop Up/;
 
25
        s/^Switch to desktop /Switch to Desktop /;
 
26
        s/^Switch desktop next/Switch to Next Desktop/;
 
27
        s/^Switch desktop previous/Switch to Previous Desktop/;
 
28
        s/^Toggle Show Desktop/Toggle Showing Desktop/;
 
29
        s/^Toggle raise and lower/Toggle Window Raise\/Lower/;
 
30
        s/^Walk back through desktop list/Walk Through Desktop List \(Reverse\)/;
 
31
        s/^Walk back through desktops/Walk Through Desktops \(Reverse\)/;
 
32
        s/^Walk back through windows/Walk Through Windows \(Reverse\)/;
 
33
        s/^Walk through desktop list/Walk Through Desktop List/;
 
34
        s/^Walk through desktops/Walk Through Desktops/;
 
35
        s/^Walk through windows/Walk Through Windows/;
 
36
        s/^Window close/Window Close/;
 
37
        s/^Window iconify/Window Iconify/;
 
38
        s/^Window lower/Window Lower/;
 
39
        s/^Window maximize/Window Maximize/;
 
40
        s/^Window maximize horizontal/Window Maximize Horizontal/;
 
41
        s/^Window maximize vertical/Window Maximize Vertical/;
 
42
        s/^Window move/Window Move/;
 
43
        s/^Window raise/Window Raise/;
 
44
        s/^Window resize/Window Resize/;
 
45
        s/^Window shade/Window Shade/;
 
46
        s/^Window to Desktop /Window to Desktop /;
 
47
        s/^Window to next desktop/Window to Next Desktop/;
 
48
        s/^Window to previous desktop/Window to Previous Desktop/;
 
49
        s/^repeat-last-klipper-action/Show Klipper Popup-Menu/;
 
50
        ($newkey) = ($_ =~ /([^=]*)=.*/);
 
51
        if ($oldkey ne $newkey) {
 
52
            print "# DELETE " . $oldkey . "\n";
 
53
            print $_
 
54
        }
 
55
    }
 
56
    if(/\[Global Keys\]/) { $keys=1; print $_; }
 
57
    if(/\[Global Shortcuts\]/) { $keys=1; print $_; }
 
58
}