diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-04 18:49:15 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-04 18:49:15 +0000 |
commit | f5531af121c4c1a7c12b6c35a1c12748ccf51d5f (patch) | |
tree | 0742d1e2e8baa495d35a55ad039a9956bf61fd62 /MDK | |
parent | c448f65a74287a13bc7d888de35f5e4776ae3dde (diff) | |
download | perl_checker-f5531af121c4c1a7c12b6c35a1c12748ccf51d5f.tar perl_checker-f5531af121c4c1a7c12b6c35a1c12748ccf51d5f.tar.gz perl_checker-f5531af121c4c1a7c12b6c35a1c12748ccf51d5f.tar.bz2 perl_checker-f5531af121c4c1a7c12b6c35a1c12748ccf51d5f.tar.xz perl_checker-f5531af121c4c1a7c12b6c35a1c12748ccf51d5f.zip |
fix (old!) typo
Diffstat (limited to 'MDK')
-rw-r--r-- | MDK/Common/Globals.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MDK/Common/Globals.pm b/MDK/Common/Globals.pm index 1bda892..0e73b83 100644 --- a/MDK/Common/Globals.pm +++ b/MDK/Common/Globals.pm @@ -23,7 +23,7 @@ sub import { no strict 'refs'; my $v = caller() . '::' . $_; - my $lv = "$foo __ $_"; + my $lv = "$name __ $_"; *$v = *$lv; eval { undef = $$lv; tie $$lv, 'MDK::Common::Globals', $_ }; } |