From 504f6c89db28716c7038153fb7838565b4ba0583 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Wed, 1 Aug 2012 17:16:09 +0200
Subject: use (my|u)gtk3 instead of *tk2

---
 perl-install/standalone/drakhelp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/standalone/drakhelp')

diff --git a/perl-install/standalone/drakhelp b/perl-install/standalone/drakhelp
index 8a8048c81..cc7aa434c 100755
--- a/perl-install/standalone/drakhelp
+++ b/perl-install/standalone/drakhelp
@@ -48,7 +48,7 @@ if (-f $instpath) {
     local $ENV{HOME} = '/root' if !$<;
     run_program::raw({ detach => 1 }, 'display_help', "file://$ancpath");
 } else {
-    $ugtk2::wm_icon = "help";
+    $ugtk3::wm_icon = "help";
     my $in = interactive->vnew;
     $in->ask_warn(N("%s Help Center", N("Mageia")), N("No Help entry for %s\n", $idlabel));
 }
-- 
cgit v1.2.1