diff options
| -rw-r--r-- | perl-install/mygtk2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm index f799f57e0..d8120240d 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -291,7 +291,7 @@ sub _gtk__Image { $w->set_from_file($file); }; gtkval_register($w, $file_ref, $set); - $set->(); + $set->() if $$file_ref; } $w; } |