diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-11 13:29:44 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-11 13:29:44 +0000 |
| commit | c1e398be894ecce6394bd76c99b76c022979ac62 (patch) | |
| tree | 62f279c533f8b96547b3fbf261449705426bb189 /perl-install/standalone | |
| parent | d545c394e5c9b2cab90b525c32de553e3d5bbfb8 (diff) | |
| download | drakx-backup-do-not-use-c1e398be894ecce6394bd76c99b76c022979ac62.tar drakx-backup-do-not-use-c1e398be894ecce6394bd76c99b76c022979ac62.tar.gz drakx-backup-do-not-use-c1e398be894ecce6394bd76c99b76c022979ac62.tar.bz2 drakx-backup-do-not-use-c1e398be894ecce6394bd76c99b76c022979ac62.tar.xz drakx-backup-do-not-use-c1e398be894ecce6394bd76c99b76c022979ac62.zip | |
various small syntax enhancements to please perl_checker
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/draksplash | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index 8455e8d74..69da21275 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -169,7 +169,7 @@ $first{'widgets'}{'combo'}{'res'}->entry->signal_connect( changed => sub { #- image file selection for new theme $first{'widgets'}{'button'}{'file'}->signal_connect( clicked =>sub{ my $file_dialog = new Gtk::FileSelection('choose image'); - $file_dialog->set_filename( ( $first{'widgets'}{'label'}{'file'}->get ne N("choose image file") )?$first{'widgets'}{'label'}{'file'}->get:'~/' ); + $file_dialog->set_filename( ( $first{'widgets'}{'label'}{'file'}->get ne N("choose image file") ) ? $first{'widgets'}{'label'}{'file'}->get : '~/' ); $file_dialog->cancel_button->signal_connect( clicked => sub{ $file_dialog->destroy} ); $file_dialog->ok_button->signal_connect( clicked => sub{ $first{'widgets'}{'label'}{'file'}->set_text($file_dialog->get_filename) ; $file_dialog->destroy ;}); $file_dialog->show; |