diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-07-27 14:50:47 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-07-27 14:50:47 +0000 |
commit | cb0cff2080ef8ab655f0ad71ed1cfa42bbdd0709 (patch) | |
tree | 40371ce5cdca8015aa6d341bd9840fbaeb7050e9 /lib/AutoLoader.pm | |
parent | 9ea8bc6dd1bb1b6c7fcffc05230d810901c5c954 (diff) | |
download | perl-cb0cff2080ef8ab655f0ad71ed1cfa42bbdd0709.tar.gz |
Allow "no AutoLoader;", based on change #6444,
suggested by Graham Barr.
p4raw-link: @6444 on //depot/perl: ed8504609e65bf608915df5053decb2c1e5c56e9
p4raw-id: //depot/perl@6456
Diffstat (limited to 'lib/AutoLoader.pm')
-rw-r--r-- | lib/AutoLoader.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lib/AutoLoader.pm b/lib/AutoLoader.pm index 8fd7d3b8fe..c26db72394 100644 --- a/lib/AutoLoader.pm +++ b/lib/AutoLoader.pm @@ -140,6 +140,11 @@ sub import { } } +sub unimport { + my $callpkg = caller; + eval "package $callpkg; sub AUTOLOAD;"; +} + 1; __END__ @@ -259,6 +264,12 @@ the package namespace. Variables pre-declared with this pragma will be visible to any autoloaded routines (but will not be invisible outside the package, unfortunately). +=head2 Not Using AutoLoader + +You can stop using AutoLoader by simply + + no AutoLoader; + =head2 B<AutoLoader> vs. B<SelfLoader> The B<AutoLoader> is similar in purpose to B<SelfLoader>: both delay the |