diff options
Diffstat (limited to 'perl-install/interactive.pm')
| -rw-r--r-- | perl-install/interactive.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index d577ded21..b7130fe5b 100644 --- a/perl-install/interactive.pm +++ b/perl-install/interactive.pm @@ -105,6 +105,8 @@ sub vnew { my $o = interactive::gtk->new; if ($o_icon && $o_icon ne 'default' && !$::isWizard) { $o->{icon} = $o_icon } else { undef $o->{icon} } return $o; + } elsif ($::testing) { + die; } } |