summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-09-28 21:10:03 +0000
committerThierry Vignaud <tv@mandriva.org>2008-09-28 21:10:03 +0000
commitc508e1f824f356fe105c587df6c329b0cc37c00c (patch)
tree7d4bd814e315fa6cfd0ac8acc6b43619826e43d4 /perl-install
parentc072369bf4a3d16bb51cd388c4c3ea04cb95b4cc (diff)
downloaddrakx-c508e1f824f356fe105c587df6c329b0cc37c00c.tar
drakx-c508e1f824f356fe105c587df6c329b0cc37c00c.tar.gz
drakx-c508e1f824f356fe105c587df6c329b0cc37c00c.tar.bz2
drakx-c508e1f824f356fe105c587df6c329b0cc37c00c.tar.xz
drakx-c508e1f824f356fe105c587df6c329b0cc37c00c.zip
use mygtk2 to create scale widgets
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/draksplash2
1 files changed, 1 insertions, 1 deletions
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]);