From 51fa3a9ccd8b81b9345e25609957a8cf98bfdf5a Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 6 Jan 2005 16:40:09 +0000
Subject: fix typo (thanks to perl_checker)

---
 perl-install/install_gtk.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index d5d602f93..e3d5108fa 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -257,7 +257,7 @@ sub special_shortcuts {
     my (undef, $event) = @_;
     my $d = ${{ $Gtk2::Gdk::Keysyms{F2} => 'screenshot', $Gtk2::Gdk::Keysyms{Delete} => 'restart' }}{$event->keyval};
     if ($d eq 'screenshot') {
-	take_screenshot($::o);
+	install_any::take_screenshot($::o);
     } elsif ($d eq 'restart' && member('control-mask', @{$event->state}) && member('mod1-mask', @{$event->state})) {
 	log::l("restarting install");
 	ugtk2->exit(0x35);
-- 
cgit v1.2.1