From ed342237df34a48124c9fbab1e8e5bc5db2abe5c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 22 May 2003 22:12:29 +0000
Subject: (quit_global) inline it

---
 perl-install/standalone/drakbug | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/perl-install/standalone/drakbug b/perl-install/standalone/drakbug
index c49bb40f3..17736e89f 100755
--- a/perl-install/standalone/drakbug
+++ b/perl-install/standalone/drakbug
@@ -46,7 +46,7 @@ my $window_g = $window->{window};
 #$window->{rwindow}->set_policy($false,$false,$true);
 $window->{rwindow}->set_border_width(5);
 $window->{rwindow}->set_title(N("Mandrake Bug Report Tool"));
-$window->{window}->signal_connect("delete_event", \&quit_global);
+$window->{window}->signal_connect("delete_event", sub { ugtk2->exit(0) });
 
 my $mdk_app = { 
 	       N("Mandrake Control Center") => 'drakconf',
@@ -169,7 +169,3 @@ sub connect_bugzilla {
     }
     $in->ask_warn('', N("No browser available! Please install one"));
 }
-
-sub quit_global() {
-    ugtk2->exit(0);
-}
-- 
cgit v1.2.1