From 38ebf15e2915bbec17121f0f89ea846b67b5a4f4 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 13 May 2003 19:19:32 +0000 Subject: - remove 80% of perl_checker warnings - gtkbuttonset is not exported by ugtk2 --- perl-install/standalone/drakconnect | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/drakconnect') diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 06b37006c..7b78e7e1f 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -61,7 +61,7 @@ MDK::Common::Globals::init( $::isEmbedded && ref($in) =~ /gtk/ or goto dd; require ugtk2; -import ugtk2 qw(:helpers :wrappers :create); +ugtk2->import(qw(:helpers :wrappers :create)); my $expert_mode = 0; network::netconnect::read_net_conf('', $netcnx, $netc); modules::load_category('net'); @@ -450,7 +450,7 @@ Configure them first by clicking on 'Configure'")),1,1,0); $widget_temp = gtksignal_connect(new Gtk2::Button(ethisup($c) ? N("deactivate now") : N("activate now")), clicked => sub { system("/sbin/if" . (ethisup($c) ? "down" : "up") . " eth$c"); - gtkbuttonset($_[0], ethisup($c) ? N("deactivate now") : N("activate now")); + ugtk2::gtkbuttonset($_[0], ethisup($c) ? N("deactivate now") : N("activate now")); }); } else { $widget_temp = N("This interface has not been configured yet.\nLaunch the configuration wizard in the main window"); -- cgit v1.2.1