From a1d8bf4af2c547c06d40058eacc8ca51956de77c Mon Sep 17 00:00:00 2001
From: Arnaud Desmons <adesmons@mandriva.com>
Date: Thu, 22 Aug 2002 13:13:09 +0000
Subject: $::Wizard_pix_up

---
 drakwizard.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'drakwizard.pl')

diff --git a/drakwizard.pl b/drakwizard.pl
index 330c1904..7ea8d0df 100755
--- a/drakwizard.pl
+++ b/drakwizard.pl
@@ -91,7 +91,7 @@ sub get_parameter {
 	    my $common_freetext_chooser;
 	    my %actions = (
 			   Wizard => sub {
-			       ($Wizard_title, $lib_script, $perl_module, $rpm) = @{$leaf}{qw(wizardTitle libScript perlModule rpm)};
+			       ($Wizard_title, $lib_script, $perl_module, $rpm, $::Wizard_pix_up) = @{$leaf}{qw(wizardTitle libScript perlModule rpm defaultImage)};
 			       if ($perl_module) {
 				   ($::perl_module_name) = ($perl_module =~ /.*\/(.*)\.pm/);
 				   require $perl_module;
@@ -125,9 +125,9 @@ sub get_parameter {
 			       $leaf->{helpText} = translate($leaf->{helpText});
 			       if ($leaf->{fontName} eq "Monospaced") {
 			       	   chomp($leaf->{helpText});
-			       	   $leaf->{helpText} = "\n".$leaf->{helpText};
+				   $leaf->{helpText} = $leaf->{helpText} ? "$leaf->{helpText}\n$leaf->{helpText}" : "$leaf->{helpText}\n";
 			       }
-			       $page->{info} = $leaf->{helpText} ? "$page->{info} $leaf->{helpText}" : "$page->{info}\n";
+			       $page->{info} = $leaf->{helpText} ? "$page->{info}\n$leaf->{helpText}" : "$page->{info}\n";
 			       if ($leaf->{fillScript}) {
 				   $page->{info} .= `source $lib_script; $leaf->{fillScript}`;
 			       }
-- 
cgit v1.2.1