diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2002-09-03 10:04:46 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2002-09-03 10:04:46 +0000 |
| commit | d4f962ac6849192071aff09965b824216e2e50ba (patch) | |
| tree | d5f812f3e45d0bdc8c5176f4ed95f0a40c4faad2 /grpmi | |
| parent | c9400166d0ca5ff9bcaa7583c3c6ea1b6a58aae9 (diff) | |
| download | rpmdrake-d4f962ac6849192071aff09965b824216e2e50ba.tar rpmdrake-d4f962ac6849192071aff09965b824216e2e50ba.tar.gz rpmdrake-d4f962ac6849192071aff09965b824216e2e50ba.tar.bz2 rpmdrake-d4f962ac6849192071aff09965b824216e2e50ba.tar.xz rpmdrake-d4f962ac6849192071aff09965b824216e2e50ba.zip | |
really forward exit code to _exit
Diffstat (limited to 'grpmi')
| -rwxr-xr-x | grpmi/grpmi.pl | 2 |
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) = @_; |