From 37f3b1c36446f1ec88293cfc0be1d41b6d627bb8 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 18 Nov 2013 02:45:58 +0100
Subject: use (my|u)gtk3 instead of *tk2

---
 mdkwebadmin.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'mdkwebadmin.pl')

diff --git a/mdkwebadmin.pl b/mdkwebadmin.pl
index 883cf04f..85959189 100755
--- a/mdkwebadmin.pl
+++ b/mdkwebadmin.pl
@@ -23,7 +23,7 @@
 use strict;
 use lib qw(/usr/lib/libDrakX);
 use standalone;
-use ugtk2 qw(:all);
+use ugtk3 qw(:all);
 use common;
 
 my ($ent, $link);
@@ -32,7 +32,7 @@ my ($opt) = @ARGV;
 @ARGV == 1 && ($opt eq '--direct' || $opt eq '--link') or exit(1);
 
 $opt eq '--direct' and exec "$execbin";
-my $w = ugtk2->new('mdkwebadmin.pl');
+my $w = ugtk3->new('mdkwebadmin.pl');
 unless ($::isEmbedded) {
     $w->{rwindow}->set_title(N("Connect to remote Site"));
     $w->{window}->set_border_width(5);
@@ -52,4 +52,4 @@ gtkadd($w->{window},
 $w->{window}->show_all;
 $w->main;
 
-sub quit() { ugtk2->exit(0) }
+sub quit() { ugtk3->exit(0) }
-- 
cgit v1.2.1