summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-02-20 10:40:19 +0000
committerOlivier Blin <oblin@mandriva.org>2005-02-20 10:40:19 +0000
commit61678cefb938c2d27351a4faf58a4ad513f619f5 (patch)
tree8ed391bba89c781df956efb994ae16a7c44b6f24 /perl-install
parenta30c1396f66d513f6e2b28e9a409d7d46a25ea87 (diff)
downloaddrakx-61678cefb938c2d27351a4faf58a4ad513f619f5.tar
drakx-61678cefb938c2d27351a4faf58a4ad513f619f5.tar.gz
drakx-61678cefb938c2d27351a4faf58a4ad513f619f5.tar.bz2
drakx-61678cefb938c2d27351a4faf58a4ad513f619f5.tar.xz
drakx-61678cefb938c2d27351a4faf58a4ad513f619f5.zip
perl_checker fixes
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakfont6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 612b2b02e..9dd9febe6 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -610,7 +610,7 @@ sub file_ok_sel {
$model->append_set(undef, [ 0 => $file_name ]);
}
}
- $file_selection->response('ok')
+ $file_selection->response('ok');
}
sub list_remove() { #- TODO : multi-selection
@@ -622,7 +622,7 @@ sub list_remove() { #- TODO : multi-selection
$treeStore->remove($iter);
}
-sub exitdialog() { Gtk2->main_quit };
+sub exitdialog() { Gtk2->main_quit }
sub dialog {
my ($title, $widgets, $buttons, $o_main_loop) = @_;
@@ -720,7 +720,7 @@ sub uninstall() { #- TODO : add item to right list with gtksignal_connect
$left_model->append_set(undef, [ 0 => $_ ]) foreach @installed_fonts_path;
#- right part
- $right_model = Gtk2::TreeStore->new("Glib::String");;
+ $right_model = Gtk2::TreeStore->new("Glib::String");
$right_list = Gtk2::TreeView->new_with_model($right_model);
$right_list->append_column(Gtk2::TreeViewColumn->new_with_attributes(undef, Gtk2::CellRendererText->new, 'text' => 0));
$right_list->set_headers_visible(0);