From 53051b7af9156d842c491bac7fec6b4749b2ce1d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 28 Jun 2004 02:13:16 +0000
Subject: disallow switching to expert mode using Alt-e

---
 perl-install/ugtk2.pm | 3 ---
 1 file changed, 3 deletions(-)

(limited to 'perl-install/ugtk2.pm')

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;
 		});
-- 
cgit v1.2.1