summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-01-22 17:21:52 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-01-22 17:21:52 +0000
commit2ba36d6f841d9e6fa5249b9323f74a10b05d468b (patch)
tree4d26e8385be27bcce993432023ae4b6410c1a9e1 /perl-install/ugtk2.pm
parentda3f8c2c6c48923b32b40e062f6a6692e0cef6ff (diff)
downloaddrakx-2ba36d6f841d9e6fa5249b9323f74a10b05d468b.tar
drakx-2ba36d6f841d9e6fa5249b9323f74a10b05d468b.tar.gz
drakx-2ba36d6f841d9e6fa5249b9323f74a10b05d468b.tar.bz2
drakx-2ba36d6f841d9e6fa5249b9323f74a10b05d468b.tar.xz
drakx-2ba36d6f841d9e6fa5249b9323f74a10b05d468b.zip
correctly pop when F2 (screenshots)
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 4b6a1f36b..dbfdb1747 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -742,7 +742,7 @@ sub new {
require install_gtk;
install_gtk::create_big_help($::o);
} elsif ($d eq 'screenshot') {
- common::take_screenshot($o);
+ 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;