From c508e1f824f356fe105c587df6c329b0cc37c00c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Sun, 28 Sep 2008 21:10:03 +0000
Subject: use mygtk2 to create scale widgets

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

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

diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash
index 31a2b99c8..a4477ac76 100755
--- a/perl-install/standalone/draksplash
+++ b/perl-install/standalone/draksplash
@@ -244,7 +244,7 @@ sub create_adj_widgets() {
 sub create_scale_table {
     my @settings = @_;
     gtknew('Table', col_spacings => 10, row_spacings => 5, children => [ map {
-	my $w = Gtk2::HScale->new($adj{$_});
+	my $w = gtknew('HScale', adjustment => $adj{$_});
 	$w->set_digits(0);
 	[ gtknew('Label', text => $scale_settings{$_}[1]), $w ];
     } @settings]);
-- 
cgit v1.2.1