From c5159a7ccd7fdec39654fb574652dc27fd950c76 Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Thu, 20 Feb 2003 14:53:09 +0000
Subject: Gtk2::Label::set is deprecated

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

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

diff --git a/perl-install/services.pm b/perl-install/services.pm
index d25855102..cfc560605 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -201,7 +201,7 @@ sub ask_standalone_gtk {
     my $update_service = sub {
 		my $started = -e "/var/lock/subsys/$_[0]";
                 my $action = $started ? "stop" : "start";
-                $_[1]->set($started ? N("running") : N("stopped"));
+                $_[1]->set_label($started ? N("running") : N("stopped"));
                 $started, $action;
     };
     my $b = Gtk2::EventBox->new;
-- 
cgit v1.2.1