From ed80980bfe10c79b8a9356bc644ac5ae2f1b6dfc Mon Sep 17 00:00:00 2001 From: Arnaud Desmons Date: Fri, 2 Aug 2002 07:56:18 +0000 Subject: navigation bug fix --- drakwizard.pl | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'drakwizard.pl') diff --git a/drakwizard.pl b/drakwizard.pl index 57ca28a5..09c31065 100755 --- a/drakwizard.pl +++ b/drakwizard.pl @@ -103,9 +103,9 @@ sub display { my $valeur; my @liste; my @data = map { - #for ($_->{fillScript}) { - # system("source $lib_script ; $_->{fillScript}"); - # } + for ($_->{fillScript}) { + system("source $lib_script ; $_->{fillScript}"); + } if($_->{main_order} eq 'combo'){ if($_->{fillScript}){ $valeur = `$_->{fillScript}`; @@ -154,18 +154,18 @@ sub navigation { find_page($o, $page->{jumpPage}), $page->{old_page}; } } - elsif ($page->{jumpScript}) { + elsif($page->{jumpScript}) { system("source $lib_script ; $page->{jumpScript}"); if ($page->{Target}->{jumpIndex}) { $? = $? >> 8; find_page($o, $page->{Target}->{jumpIndex}->{$?}), $page; - } - elsif ($page->{jumpPage}) { - find_page($o, $page->{jumpPage}), $page->{old_page}; + } + else { + $page->{next_page}, $page->{old_page}; } } else { - $page->{next_page}, $page->{old_page}; + $page->{next_page}, $page; } }; navigation($o, $next, $prev); -- cgit v1.2.1