diff options
| author | Olivier Blin <oblin@mandriva.org> | 2005-06-10 05:06:07 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2005-06-10 05:06:07 +0000 |
| commit | be49132ae4715dce66b69f56f51a6cd0f8a0e5bd (patch) | |
| tree | 1647f46b64ad411d99695f00c19d8251c54f1e1d /drakpxelinux.pl | |
| parent | aad6d241bb1bca2b149f52bd9a532e5bdeeee8ac (diff) | |
| download | drakpxelinux-be49132ae4715dce66b69f56f51a6cd0f8a0e5bd.tar drakpxelinux-be49132ae4715dce66b69f56f51a6cd0f8a0e5bd.tar.gz drakpxelinux-be49132ae4715dce66b69f56f51a6cd0f8a0e5bd.tar.bz2 drakpxelinux-be49132ae4715dce66b69f56f51a6cd0f8a0e5bd.tar.xz drakpxelinux-be49132ae4715dce66b69f56f51a6cd0f8a0e5bd.zip | |
remove unused variables or make perl_checker happy with them
Diffstat (limited to 'drakpxelinux.pl')
| -rw-r--r-- | drakpxelinux.pl | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/drakpxelinux.pl b/drakpxelinux.pl index 61c4676..f55d966 100644 --- a/drakpxelinux.pl +++ b/drakpxelinux.pl @@ -165,7 +165,7 @@ sub create_model() { # wizard to add an entry in PXE menu sub wizard_add_entry { - my ($widget, $treeview) = @_; + my ($_widget, $treeview) = @_; my $model = $treeview->get_model; local $::isEmbedded = 0; @@ -253,7 +253,7 @@ sub wizard_add_entry { # remove an entry in PXE menu sub remove_item { - my ($widget, $treeview) = @_; + my ($_widget, $treeview) = @_; $::isWizard = 0; my $model = $treeview->get_model; my $selection = $treeview->get_selection; @@ -295,7 +295,7 @@ sub test_similar_label { # dialog box to edit a PXE entry sub edit_box_item { - my ($widget, $treeview) = @_; + my ($_widget, $treeview) = @_; $::isWizard = 0; my $model = $treeview->get_model; my $selection = $treeview->get_selection; @@ -328,7 +328,6 @@ sub edit_box_item { $fd->signal_connect("destroy", sub { $fd->hide }); $fd->ok_button->signal_connect(clicked => sub { my $file = $fd->get_filename; - my $filesel = basename($file); if ($test eq "dir") { -d $file or err_dialog(N("Error!"), N("Should be a directory.")) and return; } else { @@ -487,7 +486,6 @@ sub edit_box_item { 0, create_okcancel({ cancel_clicked => sub { $dialog->destroy }, ok_clicked => sub { - my $vgacode = $network::pxe::vga_resolution_to_bios{$vga->entry->get_text}; #ask_okcancel("are you sure you want to update all those values ?"); $entry->{label} = $label->get_text; $entry->{info} = $info->get_text; @@ -496,8 +494,7 @@ sub edit_box_item { $entry->{automatic} = $automatic->entry->get_text; $entry->{interface} = $interface->entry->get_text; # check dhcp or ipaddress - my $s = $toggledhcp->get_active; - if ($toggledhcp->get_active eq "1") { + if ($toggledhcp->get_active) { $entry->{network} = "dhcp"; } else { $entry->{network} = $ipaddr->get_text; |