summaryrefslogtreecommitdiffstats
path: root/MDK
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-12-04 18:49:15 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-12-04 18:49:15 +0000
commit5bd8090f2565d5916255e68eb50d70ddd07681f6 (patch)
tree6ce5628ef9bc16cc018ecc1d8aa6f60f8692e744 /MDK
parent8f48fd94bf41b4c062db2a32803c4abd22b81a33 (diff)
downloadperl-MDK-Common-5bd8090f2565d5916255e68eb50d70ddd07681f6.tar
perl-MDK-Common-5bd8090f2565d5916255e68eb50d70ddd07681f6.tar.gz
perl-MDK-Common-5bd8090f2565d5916255e68eb50d70ddd07681f6.tar.bz2
perl-MDK-Common-5bd8090f2565d5916255e68eb50d70ddd07681f6.tar.xz
perl-MDK-Common-5bd8090f2565d5916255e68eb50d70ddd07681f6.zip
fix (old!) typo
Diffstat (limited to 'MDK')
-rw-r--r--MDK/Common/Globals.pm2
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', $_ };
}