diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-05-13 14:42:46 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-05-13 14:42:46 +0000 |
commit | 6f03a84148ac2d0aa1e64b7d64c3071d89317492 (patch) | |
tree | 9cfaf76073700f8ffdfb9347121b0b2d779bef1a /perl-install | |
parent | df78ae639dcb7a0b748e76b3255ac3d6aad15d27 (diff) | |
download | drakx-backup-do-not-use-6f03a84148ac2d0aa1e64b7d64c3071d89317492.tar drakx-backup-do-not-use-6f03a84148ac2d0aa1e64b7d64c3071d89317492.tar.gz drakx-backup-do-not-use-6f03a84148ac2d0aa1e64b7d64c3071d89317492.tar.bz2 drakx-backup-do-not-use-6f03a84148ac2d0aa1e64b7d64c3071d89317492.tar.xz drakx-backup-do-not-use-6f03a84148ac2d0aa1e64b7d64c3071d89317492.zip |
let ugtk2->new manage the title setting
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakboot | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot index c5e219a82..a83bd00c0 100755 --- a/perl-install/standalone/drakboot +++ b/perl-install/standalone/drakboot @@ -44,20 +44,19 @@ if (!$in->isa('interactive::gtk')) { $in->exit(0); } require ugtk2; -import ugtk2 qw(:helpers :wrappers :create); +ugtk2->import(qw(:helpers :wrappers :create)); my $no_bootsplash; my $x_mode = Xconfig::various::runlevel() == 5; my $auto_mode = any::get_autologin(); my $lilogrub = chomp_(`detectloader -q`); -my $w = ugtk2->new(); +my $w = ugtk2->new(N("Boot Style Configuration")); my $window = $w->{window}; $::main_window = $w->{rwindow} if !$::isEmbedded; $window->signal_connect(delete_event => sub { utk2->exit(0) }); unless ($::isEmbedded) { - $w->{rwindow}->set_title(N("Boot Style Configuration")); $window->set_border_width(2); ### menus definition |