diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-12-22 16:19:17 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-12-22 16:19:17 +0000 |
| commit | 57ff11bcab4a2f9663a16308db96b32fb6ccd9b7 (patch) | |
| tree | e690364783c887fba3121ccf9582c3bf093061d4 | |
| parent | 1d38f727ff7c5dd68e93155413820c9f9e7c20bd (diff) | |
| download | perl-MDK-Common-57ff11bcab4a2f9663a16308db96b32fb6ccd9b7.tar perl-MDK-Common-57ff11bcab4a2f9663a16308db96b32fb6ccd9b7.tar.gz perl-MDK-Common-57ff11bcab4a2f9663a16308db96b32fb6ccd9b7.tar.bz2 perl-MDK-Common-57ff11bcab4a2f9663a16308db96b32fb6ccd9b7.tar.xz perl-MDK-Common-57ff11bcab4a2f9663a16308db96b32fb6ccd9b7.zip | |
ensure syscall_() work whatever is the first module to use it
| -rw-r--r-- | MDK/Common/System.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/MDK/Common/System.pm b/MDK/Common/System.pm index d792383..04993d7 100644 --- a/MDK/Common/System.pm +++ b/MDK/Common/System.pm @@ -188,6 +188,7 @@ L<MDK::Common> use MDK::Common::Math; use MDK::Common::File; +require 'syscall.ph'; use Exporter; our @ISA = qw(Exporter); @@ -294,9 +295,7 @@ sub list_users() { sub syscall_ { my $f = shift; - - require 'syscall.ph'; - syscall(&{"main::SYS_$f"}, @_) == 0; + syscall(&{"MDK::Common::System::SYS_$f"}, @_) == 0 } |