perl_checker cleanup, $select_font_msg is unused

1 files changed, 1 insertions, 3 deletions

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 4f31f3c67..8d602b2d2 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -578,11 +578,9 @@ sub appli_choice() {
 	  );
 }
 
-my $select_font_msg;
-
 sub font_choice() {
     my $file_dialog;
-    $select_font_msg = N("Select the font file or directory and click on 'Add'");
+    my $_select_font_msg = N("Select the font file or directory and click on 'Add'");
     $file_dialog = Gtk2::FileChooserDialog->new(N("File Selection"), $window1->{real_window}, 'open', N("Cancel") => 'cancel', N("Ok") => 'ok'); # 'select_folder'
     $file_dialog->set_select_multiple(1);