From 036f4ed425a4a5bdbc20c24bd861746882804172 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 21 Apr 2005 11:37:53 +0000
Subject: inline useless create_fontsel()

---
 perl-install/standalone/drakfont | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

(limited to 'perl-install/standalone/drakfont')

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index da9653de9..26c514bf0 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -464,10 +464,6 @@ sub backend_mod() {
     }
 }
 
-sub create_fontsel() {
-    Gtk2::FontSelection->new;
-}
-
 sub interactive_mode() {
     $interactive = 1;
     $window1 = ugtk2->new('drakfont');
@@ -486,7 +482,7 @@ sub interactive_mode() {
 	   gtkpack_(Gtk2::VBox->new(0, 2), 
                  if_(!$::isEmbedded, 0, Gtk2::Banner->new("drakfont", N("DrakFont"))), 
                  0, Gtk2::WrappedLabel->new(N("Font List")),
-                 1, create_fontsel(),
+                 1, Gtk2::FontSelection->new,
                  0, create_okcancel(my $oc = {
                                      ok_clicked => sub { Gtk2->main_quit },
                                     },
-- 
cgit v1.2.1