From 5d315bac610e4b1745572f65b57a77b260643734 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Mon, 19 Mar 2012 12:02:33 +0000
Subject: (no_more_supported_choice) small perl_checker cleanup

---
 mgaapplet | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'mgaapplet')

diff --git a/mgaapplet b/mgaapplet
index 62a07862..dbf31fff 100755
--- a/mgaapplet
+++ b/mgaapplet
@@ -535,7 +535,7 @@ sub no_more_supported_choice() {
     # FIXME: just tell radio buttons' children to wrap instead:
     local $mgaapplet_gui::width = 580;
     my $w = new_portable_dialog(N("Your distribution is no longer supported"));
-    my ($b1, $b2, $b3);
+    my ($b1, $b2);
     my $choice = $extended_maintenance_url ? 'extended' : ($no_more_supported ne 'none' ? 'upgrade' : undef);
 
     my @widgets = (
@@ -568,7 +568,7 @@ sub no_more_supported_choice() {
             ]),
             gtknew('HSeparator'),
         ) : ()),
-        $b3 = gtknew('RadioButton', text => N("Do not ask me next time"),
+        gtknew('RadioButton', text => N("Do not ask me next time"),
                      toggled => sub {
                          $choice = 'nothing' if $_[0]->get_active;
                          $warn_me = $_[0]->get_active },
-- 
cgit v1.2.1