summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-06-28 02:13:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-06-28 02:13:16 +0000
commit53051b7af9156d842c491bac7fec6b4749b2ce1d (patch)
tree7e2347d9009e4a730fab5bc0f27f2c9663e5b8a4 /perl-install/ugtk2.pm
parent5f0e35f5ed62c150d73f527a4f406662dc65f70a (diff)
downloaddrakx-53051b7af9156d842c491bac7fec6b4749b2ce1d.tar
drakx-53051b7af9156d842c491bac7fec6b4749b2ce1d.tar.gz
drakx-53051b7af9156d842c491bac7fec6b4749b2ce1d.tar.bz2
drakx-53051b7af9156d842c491bac7fec6b4749b2ce1d.tar.xz
drakx-53051b7af9156d842c491bac7fec6b4749b2ce1d.zip
disallow switching to expert mode using Alt-e
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm3
1 files changed, 0 insertions, 3 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index c28720f93..c29e5cb02 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -940,9 +940,6 @@ sub new {
my $d = ${{ $Gtk2::Gdk::Keysyms{F2} => 'screenshot' }}{$event->keyval};
if ($d eq 'screenshot') {
common::take_screenshot();
- } elsif (chr($event->keyval) eq 'e' && member('mod1-mask', @{$event->state})) { #- alt-e
- log::l("Switching to " . ($::expert ? "beginner" : "expert"));
- $::expert = !$::expert;
}
0;
});