summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-08-18 13:21:14 +0000
committerThierry Vignaud <tv@mandriva.org>2008-08-18 13:21:14 +0000
commite244711cc629628d4d22638f3b6a78a9ece3d6a1 (patch)
treedf197d1b577109ace51d7957eb7d8a87e9b59dfc /perl-install
parent58358f3e1182da30ecf43ba8e7dde8537956cd2d (diff)
downloaddrakx-e244711cc629628d4d22638f3b6a78a9ece3d6a1.tar
drakx-e244711cc629628d4d22638f3b6a78a9ece3d6a1.tar.gz
drakx-e244711cc629628d4d22638f3b6a78a9ece3d6a1.tar.bz2
drakx-e244711cc629628d4d22638f3b6a78a9ece3d6a1.tar.xz
drakx-e244711cc629628d4d22638f3b6a78a9ece3d6a1.zip
(_gtk__MagicWindow) display a separator below titles
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/NEWS1
-rw-r--r--perl-install/mygtk2.pm8
2 files changed, 7 insertions, 2 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index db4eddf56..730ec2594 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,4 +1,5 @@
- align titles to the left
+- display a separator below titles
- update language step
Version 11.11 - 18 August 2008
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index 8cb691002..63599757b 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -653,7 +653,9 @@ sub _gtk__MagicWindow {
my $provided_banner = delete $opts->{banner};
if ($pop_it && $provided_banner) {
- $sub_child = gtknew('VBox', children => [ 0, $provided_banner, if_($sub_child, 1, $sub_child) ]);
+ $sub_child = gtknew('VBox', children => [ 0, $provided_banner,
+ if_($::isInstall, 0, Gtk2::HSeparator->new),
+ if_($sub_child, 1, $sub_child) ]);
} else {
$sub_child ||= gtknew('VBox');
}
@@ -697,7 +699,9 @@ sub _gtk__MagicWindow {
$w = $::WizardWindow;
- gtkadd($::WizardTable, children_tight => [ $provided_banner ]) if $provided_banner;
+ gtkadd($::WizardTable, children_tight => [ $provided_banner,
+ if_($::isInstall, Gtk2::HSeparator->new),
+ ]) if $provided_banner;
gtkadd($::WizardTable, children_loose => [ $sub_child ]);
}
bless {