diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-09-26 09:10:02 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-09-26 09:10:02 +0000 |
| commit | 80a65c702acaa59cb295ad1d622ad632fd20932e (patch) | |
| tree | ce9ade694d775a1f1e96fc75532eb3de0f6e43b1 /ext/DynaLoader | |
| parent | 2504ae5250790bc6da9ecd41645e0005cd550a86 (diff) | |
| download | perl-80a65c702acaa59cb295ad1d622ad632fd20932e.tar.gz | |
Upgrade to XSLoader 0.10.
p4raw-id: //depot/perl@34422
Diffstat (limited to 'ext/DynaLoader')
| -rw-r--r-- | ext/DynaLoader/XSLoader_pm.PL | 5 | ||||
| -rw-r--r-- | ext/DynaLoader/t/XSLoader.t | 8 |
2 files changed, 7 insertions, 6 deletions
diff --git a/ext/DynaLoader/XSLoader_pm.PL b/ext/DynaLoader/XSLoader_pm.PL index 036acfeab4..a258f6ea51 100644 --- a/ext/DynaLoader/XSLoader_pm.PL +++ b/ext/DynaLoader/XSLoader_pm.PL @@ -15,7 +15,7 @@ print OUT <<'EOT'; package XSLoader; -$VERSION = "0.09_1"; +$VERSION = "0.10"; #use strict; @@ -82,6 +82,7 @@ print OUT <<'EOT'; $bs =~ s/(\.\w+)?(;\d*)?$/\.bs/; # look for .bs 'beside' the library if (-s $bs) { # only read file if it's not empty +# print STDERR "BS: $bs ($^O, $dlsrc)\n" if $dl_debug; eval { do $bs; }; warn "$bs: $@\n" if $@; } @@ -167,7 +168,7 @@ XSLoader - Dynamically load C libraries into Perl code =head1 VERSION -Version 0.09 +Version 0.10 =head1 SYNOPSIS diff --git a/ext/DynaLoader/t/XSLoader.t b/ext/DynaLoader/t/XSLoader.t index 2c7479eec8..bce7b0ec50 100644 --- a/ext/DynaLoader/t/XSLoader.t +++ b/ext/DynaLoader/t/XSLoader.t @@ -53,12 +53,12 @@ like( $@, '/^XSLoader::load\(\'Your::Module\', \$Your::Module::VERSION\)/', eval q{ package Thwack; XSLoader::load('Thwack'); }; if ($Config{usedl}) { - like( $@, q{/^Can't locate loadable object for module Thwack in @INC/}, - "calling XSLoader::load() under a package with no XS part" ); + like( $@, q{/^Can't locate loadable object for module Thwack in @INC/}, + "calling XSLoader::load() under a package with no XS part" ); } else { - like( $@, q{/^Can't load module Thwack, dynamic loading not available in this perl./}, - "calling XSLoader::load() under a package with no XS part" ); + like( $@, q{/^Can't load module Thwack, dynamic loading not available in this perl./}, + "calling XSLoader::load() under a package with no XS part" ); } # Now try to load well known XS modules |