summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/draksplash
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-11-11 13:29:44 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-11-11 13:29:44 +0000
commitc1e398be894ecce6394bd76c99b76c022979ac62 (patch)
tree62f279c533f8b96547b3fbf261449705426bb189 /perl-install/standalone/draksplash
parentd545c394e5c9b2cab90b525c32de553e3d5bbfb8 (diff)
downloaddrakx-c1e398be894ecce6394bd76c99b76c022979ac62.tar
drakx-c1e398be894ecce6394bd76c99b76c022979ac62.tar.gz
drakx-c1e398be894ecce6394bd76c99b76c022979ac62.tar.bz2
drakx-c1e398be894ecce6394bd76c99b76c022979ac62.tar.xz
drakx-c1e398be894ecce6394bd76c99b76c022979ac62.zip
various small syntax enhancements to please perl_checker
Diffstat (limited to 'perl-install/standalone/draksplash')
-rwxr-xr-xperl-install/standalone/draksplash2
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;