projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9ea8bc6
)
Allow "no AutoLoader;", based on change #6444,
author
Jarkko Hietaniemi
<jhi@iki.fi>
Thu, 27 Jul 2000 14:50:47 +0000
(14:50 +0000)
committer
Jarkko Hietaniemi
<jhi@iki.fi>
Thu, 27 Jul 2000 14:50:47 +0000
(14:50 +0000)
suggested by Graham Barr.
p4raw-link: @6444 on //depot/perl:
ed8504609e65bf608915df5053decb2c1e5c56e9
p4raw-id: //depot/perl@6456
lib/AutoLoader.pm
patch
|
blob
|
history
diff --git
a/lib/AutoLoader.pm
b/lib/AutoLoader.pm
index
8fd7d3b
..
c26db72
100644
(file)
--- 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