From a4278ef515ed6c5763da1c8d04b93e965e88ae04 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Mon, 26 Jul 2004 08:45:00 +0000
Subject: Redundant line.

---
 perl-install/ugtk2.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index d04285fd0..0c3c0dd8d 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -1377,7 +1377,6 @@ sub ask_browse_tree_info_given_widgets {
 	    $w->{tree}->toggle_expansion($w->{tree_model}->get_path($curr));
 	} else {
 	    if (ref $curr) {
-		my @_a = $children->($curr);
 		my @l = $common->{grep_allowed_to_toggle}($children->($curr)) or return;
 		my @unsel = $common->{grep_unselected}(@l);
 		my @p = @unsel ?
-- 
cgit v1.2.1