summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-03-03 16:46:43 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-03-03 16:46:43 +0000
commit9a682226521c5a58996586175432c79d323ed801 (patch)
tree2cb3881d7e24cee873219b77d13b1d5a43e6bc80 /perl-install
parentc5d54851af1234495549209c713f926acc1918b3 (diff)
downloaddrakx-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-xperl-install/standalone/drakperm4
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);
}