From 415951abd4368a86588eef302b6db1b3fc3394b9 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 22 Jan 2004 18:21:24 +0000
Subject: perl_checker cleanups

---
 perl-install/standalone/drakfont | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 3e65f5299..82cad5845 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -488,7 +488,7 @@ sub interactive_mode() {
                  if_(!$::isEmbedded, 0, gtkcreate_img("drakfont.620x57")), 
                  0, Gtk2::WrappedLabel->new(N("Font List")),
                  1, create_fontsel(),
-                 0, create_okcancel( my $oc = {
+                 0, create_okcancel(my $oc = {
                                      ok_clicked => sub { Gtk2->main_quit },
                                     },
                                     undef, undef, '',
@@ -756,8 +756,7 @@ sub import_status() {
                                 [ N("Post Install"), $pbar3, $pbar3->set_text(' ') ],
                                ),
            ],
-           [
-           ],
+           [],
            \&backend_mod,
           );
 }
@@ -776,8 +775,7 @@ sub import_status_uninstall() {
 				[ N("Post Uninstall"), $pbar2, $pbar2->set_text(' ') ],
 			       ),
 	   ],
-	   [
-	   ],
+	   [],
 	   \&backend_mod,
 	  );
 }
-- 
cgit v1.2.1