diff options
| -rw-r--r-- | perl-install/ugtk2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 722034c65..622574401 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -812,7 +812,7 @@ sub exit { } #- in case "exit" above was not called by the program -END { print "BUG in $0 : ugtk2->exit was *NOT* called !! \n"; &exit() } +END { &exit() } sub _create_window($$) { my ($o, $title) = @_; |