diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-03-03 16:46:43 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-03-03 16:46:43 +0000 |
commit | 9a682226521c5a58996586175432c79d323ed801 (patch) | |
tree | 2cb3881d7e24cee873219b77d13b1d5a43e6bc80 /perl-install | |
parent | c5d54851af1234495549209c713f926acc1918b3 (diff) | |
download | drakx-9a682226521c5a58996586175432c79d323ed801.tar drakx-9a682226521c5a58996586175432c79d323ed801.tar.gz drakx-9a682226521c5a58996586175432c79d323ed801.tar.bz2 drakx-9a682226521c5a58996586175432c79d323ed801.tar.xz drakx-9a682226521c5a58996586175432c79d323ed801.zip |
remove unused $rows_cnt
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakperm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 7e56d8a6d..c1746baa0 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -24,7 +24,6 @@ my %perm = ( 'level 1' => $perm_path.'perm.1', 'level 5' => $perm_path.'perm.5', 'editable' => $local_path.'perm.local', ); -my $rows_cnt = 0; my $editable = 0; my $modified = 0; my $prec_txt = $default_perm_level; @@ -52,7 +51,6 @@ $combo_perm->set_popdown_strings(sort(keys %perm)); sub add_callback { row_setting_dialog($treeModel->append_set(undef, [ 0 => 'new', 1 => '-', 2 => '-', 3 => '-' ])); - $rows_cnt++; $modified++; } @@ -72,7 +70,6 @@ sub edit_callback { sub del_callback { my ($tree, $iter) = $permList->get_selection->get_selected(); $tree->remove($iter); - $rows_cnt--; $modified++; } @@ -174,7 +171,6 @@ sub display_perm { close F; $up_down_box->set_sensitive($editable); - $rows_cnt = $i; $prec_txt = $perm_level; undef(%CURENT); } |