Change 30116 by [EMAIL PROTECTED] on 2007/02/04 18:51:01
Put the assignment to $XS_VERSION in a BEGIN block too.
Affected files ...
... //depot/maint-5.8/perl/ext/DynaLoader/DynaLoader_pm.PL#14 edit
Differences ...
==== //depot/maint-5.8/perl/ext/DynaLoader/DynaLoader_pm.PL#14 (text) ====
Index: perl/ext/DynaLoader/DynaLoader_pm.PL
--- perl/ext/DynaLoader/DynaLoader_pm.PL#13~30115~ 2007-02-04
10:49:54.000000000 -0800
+++ perl/ext/DynaLoader/DynaLoader_pm.PL 2007-02-04 10:51:01.000000000
-0800
@@ -109,7 +109,10 @@
# perl_parse, and in turn that is typically the static function xs_init
# defined in the same place as the caller to perl_parse, and at the same time,
# so compiled in and installed as binaries now deployed.)
-$XS_VERSION = '1.05';
+
+BEGIN {
+ $XS_VERSION = '1.05';
+}
require AutoLoader;
*AUTOLOAD = \&AutoLoader::AUTOLOAD;
End of Patch.
