diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-07-24 22:58:36 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-07-24 22:58:36 +0000 |
| commit | 72e28b71c097e4f2b17b031416790090cefb8263 (patch) | |
| tree | 7d76b1106d53506122086b57a1cfda99af714fa0 /MDK/Common/System.pm | |
| parent | 5bef71a0c86613f95e154d08b5f8f0cc23226e27 (diff) | |
| download | perl-MDK-Common-72e28b71c097e4f2b17b031416790090cefb8263.tar perl-MDK-Common-72e28b71c097e4f2b17b031416790090cefb8263.tar.gz perl-MDK-Common-72e28b71c097e4f2b17b031416790090cefb8263.tar.bz2 perl-MDK-Common-72e28b71c097e4f2b17b031416790090cefb8263.tar.xz perl-MDK-Common-72e28b71c097e4f2b17b031416790090cefb8263.zip | |
everything should work now
Diffstat (limited to 'MDK/Common/System.pm')
| -rw-r--r-- | MDK/Common/System.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/MDK/Common/System.pm b/MDK/Common/System.pm index c8c4535..d383a1f 100644 --- a/MDK/Common/System.pm +++ b/MDK/Common/System.pm @@ -6,7 +6,7 @@ use MDK::Common::File; use vars qw(@ISA %EXPORT_TAGS @EXPORT_OK %compat_arch $printable_chars $sizeof_int $bitof_int); #); @ISA = qw(Exporter); -@EXPORT_OK = qw(%compat_arch $printable_chars $sizeof_int $bitof_int typeFromMagic list_passwd list_home list_skels syscall_ df sync psizeof availableMemory availableRamMB gettimeofday unix2dos getVarsFromSh setVarsInSh setVarsInShMode setVarsInCsh template2file template2userfile update_userkderc); #); +@EXPORT_OK = qw(%compat_arch $printable_chars $sizeof_int $bitof_int typeFromMagic list_passwd list_home list_skels syscall_ psizeof availableMemory availableRamMB gettimeofday unix2dos getVarsFromSh setVarsInSh setVarsInShMode setVarsInCsh template2file template2userfile update_userkderc); #); %EXPORT_TAGS = (all => [ @EXPORT_OK ]); @@ -74,7 +74,7 @@ sub syscall_ { my $f = shift; require 'syscall.ph'; - syscall(&{$common::{"SYS_$f"}}, @_) == 0; + syscall(&{"SYS_$f"}, @_) == 0; } |