summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-05-13 14:42:46 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-05-13 14:42:46 +0000
commit6f03a84148ac2d0aa1e64b7d64c3071d89317492 (patch)
tree9cfaf76073700f8ffdfb9347121b0b2d779bef1a /perl-install
parentdf78ae639dcb7a0b748e76b3255ac3d6aad15d27 (diff)
downloaddrakx-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-xperl-install/standalone/drakboot5
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