diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2005-06-03 07:37:47 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2005-06-03 07:37:47 +0000 |
commit | a93423d7426bfed436ac64ddcfcde4a0f5e7ad09 (patch) | |
tree | 4c8a62a4d66b9ca7c70056296cd81f7ff7fb1b01 | |
parent | b3b293d414594a0dc6b1d329dc86b8ffbb7455e1 (diff) | |
download | drakx-backup-do-not-use-a93423d7426bfed436ac64ddcfcde4a0f5e7ad09.tar drakx-backup-do-not-use-a93423d7426bfed436ac64ddcfcde4a0f5e7ad09.tar.gz drakx-backup-do-not-use-a93423d7426bfed436ac64ddcfcde4a0f5e7ad09.tar.bz2 drakx-backup-do-not-use-a93423d7426bfed436ac64ddcfcde4a0f5e7ad09.tar.xz drakx-backup-do-not-use-a93423d7426bfed436ac64ddcfcde4a0f5e7ad09.zip |
use "our" instead of "use vars"
-rw-r--r-- | perl-install/common.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm index 1ffb5d3cf..1933975e5 100644 --- a/perl-install/common.pm +++ b/perl-install/common.pm @@ -5,11 +5,10 @@ use MDK::Common::System; use diagnostics; use strict; use run_program; -use vars qw(@ISA @EXPORT $SECTORSIZE); -@ISA = qw(Exporter); -# no need to export ``_'' -@EXPORT = qw($SECTORSIZE N N_ check_for_xserver files_exist formatTime formatXiB is_xbox makedev mandrake_release removeXiBSuffix require_root_capability salt setVirtual set_alternative set_l10n_sort set_permissions translate unmakedev); +use Exporter; +our @ISA = qw(Exporter); +our @EXPORT = qw($SECTORSIZE N N_ check_for_xserver files_exist formatTime formatXiB is_xbox makedev mandrake_release removeXiBSuffix require_root_capability salt setVirtual set_alternative set_l10n_sort set_permissions translate unmakedev); # perl_checker: RE-EXPORT-ALL push @EXPORT, @MDK::Common::EXPORT; |