1 files changed, 1 insertions, 1 deletions
diff --git a/grpmi/grpmi.pl b/grpmi/grpmi.pl
index b76f23a3..920602b2 100755
--- a/grpmi/grpmi.pl
+++ b/grpmi/grpmi.pl
@@ -38,7 +38,7 @@ sub _ {
     my $s = shift @_; my $t = translate($s);
     sprintf $t, @_;
 }
-sub mexit { my_gtk::exit @_ }
+sub mexit { my_gtk::exit(undef, @_) }
 
 sub interactive_msg {
     my ($title, $contents, $yesno) = @_;