diff options
Diffstat (limited to 'drakpxelinux.pl')
-rw-r--r-- | drakpxelinux.pl | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/drakpxelinux.pl b/drakpxelinux.pl index 595d1fd..9ece3c1 100644 --- a/drakpxelinux.pl +++ b/drakpxelinux.pl @@ -301,8 +301,7 @@ sub wizard_add_entry { # my $WALLRDZ = "/tmp/all.rdz"; my $WVMLINUZ = "/mnt/nfs/isolinux/alt0/vmlinuz"; # my $WVMLINUZ = "/tmp/vmlinuz"; - my $w = wizards->new; - my $wiz = { + my $wiz = wizards->new({ name => N("Add a PXE entry"), pages => { welcome => { @@ -374,8 +373,8 @@ sub wizard_add_entry { next => 0, }, } - }; - $w->process($wiz, $in); + }); + $wiz->process($in); $::isWizard = 0; gtkset_mousecursor_normal(); } @@ -736,8 +735,7 @@ sub wizard_pxe_server() { undef $::WizardWindow; $::isWizard = 1; use wizards; - my $w = wizards->new; - my $wiz = { + my $wiz = wizards->new({ name => N("PXE Wizard"), needed => { "tftp-server", "pxe", "dhcpd" }, pages => { @@ -782,8 +780,8 @@ sub wizard_pxe_server() { next => 0 }, }, - }; - $w->process($wiz, $in); + }); + $wiz->process($in); gtkset_mousecursor_normal(); } |