From 5e9ff63780a1ff7ef558f2cd22711a05cb777c49 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 11 Aug 2004 05:12:37 +0000
Subject: (Dialog) simplify: reuse create_scrolled_window()

---
 perl-install/standalone/drakroam | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam
index 0f06aa00c..1f1ccc3d4 100755
--- a/perl-install/standalone/drakroam
+++ b/perl-install/standalone/drakroam
@@ -331,11 +331,7 @@ my $content = join('', cat_($FilePointer));
 my $AboutWindow = Gtk2::Dialog->new("Drakroam Info", $w->{window},
                                     'destroy-with-parent',
                                     'gtk-ok' => 'none');
-my $AboutLabel = Gtk2::Label->new($content);
-my $DialogScroll = Gtk2::ScrolledWindow->new;
-#$DialogScroll->set_policy('automatic', 'automatic');
-$DialogScroll->add_with_viewport($AboutLabel);
-$AboutWindow->vbox->add($DialogScroll);
+$AboutWindow->vbox->add(create_scrolled_window(Gtk2::Label->new($content)));
 $AboutWindow->signal_connect(response => sub { $_[0]->destroy });
 $AboutWindow->show_all;
 }
-- 
cgit v1.2.1