diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-11 05:12:37 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-11 05:12:37 +0000 |
| commit | 5e9ff63780a1ff7ef558f2cd22711a05cb777c49 (patch) | |
| tree | 14dbdd53c3e06cb42efee2baa836d8b7b69df11a /perl-install/standalone | |
| parent | d11528acf2c12cab3088d8dfea75d7e1b4ea5820 (diff) | |
| download | drakx-5e9ff63780a1ff7ef558f2cd22711a05cb777c49.tar drakx-5e9ff63780a1ff7ef558f2cd22711a05cb777c49.tar.gz drakx-5e9ff63780a1ff7ef558f2cd22711a05cb777c49.tar.bz2 drakx-5e9ff63780a1ff7ef558f2cd22711a05cb777c49.tar.xz drakx-5e9ff63780a1ff7ef558f2cd22711a05cb777c49.zip | |
(Dialog) simplify: reuse create_scrolled_window()
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakroam | 6 |
1 files changed, 1 insertions, 5 deletions
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; } |