diff options
| author | Olivier Blin <oblin@mandriva.org> | 2005-02-20 10:40:19 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2005-02-20 10:40:19 +0000 |
| commit | 61678cefb938c2d27351a4faf58a4ad513f619f5 (patch) | |
| tree | 8ed391bba89c781df956efb994ae16a7c44b6f24 /perl-install/standalone | |
| parent | a30c1396f66d513f6e2b28e9a409d7d46a25ea87 (diff) | |
| download | drakx-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/standalone')
| -rwxr-xr-x | perl-install/standalone/drakfont | 6 |
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); |