do not import everything from POSIX

1 files changed, 2 insertions, 2 deletions

diff --git a/bin/draknetprofile b/bin/draknetprofile
index faeac12..45438a0 100755
--- a/bin/draknetprofile
+++ b/bin/draknetprofile
@@ -31,7 +31,7 @@ use network::network;
 use mygtk2;
 use Gtk2::SimpleList;
 use ugtk2 qw(:create :helpers :wrappers :dialogs);
-use POSIX;
+use POSIX ();
 
 $ugtk2::wm_icon = 'draknetprofile-16';
 my $title = N("Network profiles");
@@ -110,7 +110,7 @@ sub set_profile {
     gtkflush();
     unless (fork()) {
 	network::network::netprofile_set($net, $profile);
-        _exit(0);
+        POSIX::_exit(0);
     }
     $SIG{CHLD} = sub {
 	$SIG{CHLD} = 'IGNORE';