summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--drakpxelinux.pl5
1 files changed, 3 insertions, 2 deletions
diff --git a/drakpxelinux.pl b/drakpxelinux.pl
index 1eb454f..343e00a 100644
--- a/drakpxelinux.pl
+++ b/drakpxelinux.pl
@@ -352,12 +352,13 @@ sub wizard_add_entry {
};
push @{$pxelinux_conf->{entries}}, $entry;
set_pxelinux_entry_at_iter($model, $model->append, $entry);
- # set default boot for profile is none
+ # set default boot for profile if none
if (!$pxelinux_conf->{default}) {
$pxelinux_conf->{default} = $WPXENAME;
$pxelinux_conf->{display} = 'messages';
$pxelinux_conf->{timeout} = '50';
$pxelinux_conf->{prompt} = '10';
+# $pxelinux_conf->{f1} = '';
}
refresh_menu();
undef $w;
@@ -513,7 +514,7 @@ sub edit_box_item {
$data->set_text("images/$label.img");
}
} elsif ($filetotest eq "auto_install") {
- run_program::get_stdout("file $file") =~ /perl/ or err_dialog(N("Error!"), N("Should be a perl script")) and \return;
+ run_program::get_stdout("file $file") =~ /perl/ or err_dialog(N("Error!"), N("Should be a perl script")) and return;
my $ip_address = network::tools::get_interface_ip_address($net, $interface);
my $auto_cfg = $network::pxe::pxelinux_client_root . "/pxelinux.cfg/profiles/auto_" . $profile . "_" . $label . ".pl";
cp_af($file, $auto_cfg);