aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake/gui.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-02-21 14:28:20 +0000
committerThierry Vignaud <tv@mandriva.org>2008-02-21 14:28:20 +0000
commitc8c192ec4cdfe5efacf225714fb2035fc1f954d8 (patch)
tree23019a67221eb578e565db2a16ef0586215d89f2 /Rpmdrake/gui.pm
parent80b94ed2ea867f9a533002be1301caae7add89d7 (diff)
downloadrpmdrake-c8c192ec4cdfe5efacf225714fb2035fc1f954d8.tar
rpmdrake-c8c192ec4cdfe5efacf225714fb2035fc1f954d8.tar.gz
rpmdrake-c8c192ec4cdfe5efacf225714fb2035fc1f954d8.tar.bz2
rpmdrake-c8c192ec4cdfe5efacf225714fb2035fc1f954d8.tar.xz
rpmdrake-c8c192ec4cdfe5efacf225714fb2035fc1f954d8.zip
perl_checker cleanups
Diffstat (limited to 'Rpmdrake/gui.pm')
-rw-r--r--Rpmdrake/gui.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index 63a8f0ff..58d7d8fb 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -159,7 +159,7 @@ sub format_pkg_simplifiedinfo {
join("\n$spacing",
map { "\x{200e}$_" } @{$pkg->{files}}
) . '</tt>') #- to highlight information
- : ()}) ];
+ : () }) ];
push @$s, [ "\n\n" ];
push @$s, [ build_expander($pkg, N("Changelog:"), 'changelog', sub { $pkg->{changelog} }, $installed_version) ];
$s;
@@ -394,7 +394,7 @@ sub ask_browse_tree_given_widgets_for_rpmdrake {
@{$ptree{$_}} = difference2($ptree{$_}, \@to_remove);
}
if (exists $wtree{$cat}) {
- my $iter_str = $w->{tree_model}->get_path_str($wtree{$cat});
+ my $_iter_str = $w->{tree_model}->get_path_str($wtree{$cat});
$w->{tree_model}->remove($wtree{$cat});
delete $wtree{$cat};
}
@@ -517,7 +517,7 @@ sub is_locale_available {
sub callback_choices {
my (undef, undef, undef, $choices) = @_;
- return $choices->[0] if $::rpmdrake_options{'auto'};
+ return $choices->[0] if $::rpmdrake_options{auto};
foreach my $pkg (@$choices) {
foreach ($pkg->requires_nosense) {
/locales-/ or next;