summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-08-30 00:18:11 -0500
committerJesse Luehrs <doy@tozt.net>2011-08-30 00:18:11 -0500
commit6a47396a8c14fa10c8e145d96abf92665d01dca5 (patch)
tree0989af5ee0124ee9e6b1cb34339b5140a5556342
parente7872e6f4b6345226a4a08a372ebeb4b87e82811 (diff)
downloadpackage-stash-xs-6a47396a8c14fa10c8e145d96abf92665d01dca5.tar.gz
package-stash-xs-6a47396a8c14fa10c8e145d96abf92665d01dca5.zip
doc and test updates from Package::Stash
-rw-r--r--lib/Package/Stash/XS.pm11
-rw-r--r--t/basic.t4
-rwxr-xr-xt/edge-cases.t4
3 files changed, 6 insertions, 13 deletions
diff --git a/lib/Package/Stash/XS.pm b/lib/Package/Stash/XS.pm
index 3954112..c93ab48 100644
--- a/lib/Package/Stash/XS.pm
+++ b/lib/Package/Stash/XS.pm
@@ -24,16 +24,9 @@ This is a backend for L<Package::Stash>, which provides the functionality in a
way that's less buggy and much faster. It will be used by default if it's
installed, and should be preferred in all environments with a compiler.
-=head1 BUGS / CAVEATS
+=head1 BUGS
-=over 4
-
-=item * Prior to perl 5.10, scalar slots are only considered to exist if they are defined
-
-This is due to a shortcoming within perl itself. See
-L<perlref/Making References> point 7 for more information.
-
-=back
+No known bugs (but see the BUGS section in L<Package::Stash>).
Please report any bugs through RT: email
C<bug-package-stash-xs at rt.cpan.org>, or browse to
diff --git a/t/basic.t b/t/basic.t
index 77c9c13..a106e9e 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -391,8 +391,8 @@ like(exception {
[qw(BEGIN bar baz foo quuuux quuux quux)],
"list_all_symbols",
);
- { local $TODO = ($] < 5.010 || $Package::Stash::IMPLEMENTATION eq 'PP')
- ? "undef scalars aren't visible on 5.8, or from pure perl at all"
+ { local $TODO = $] < 5.010
+ ? "undef scalars aren't visible on 5.8"
: undef;
is_deeply(
[sort $quuux->list_all_symbols('SCALAR')],
diff --git a/t/edge-cases.t b/t/edge-cases.t
index 7c82626..04e2164 100755
--- a/t/edge-cases.t
+++ b/t/edge-cases.t
@@ -26,8 +26,8 @@ use Package::Stash;
}
my $stash = Package::Stash->new('Foo');
-{ local $TODO = ($] < 5.010 || $Package::Stash::IMPLEMENTATION eq 'PP')
- ? "undef scalars aren't visible on 5.8, or from pure perl at all"
+{ local $TODO = $] < 5.010
+ ? "undef scalars aren't visible on 5.8"
: undef;
ok($stash->has_symbol('$SCALAR'), '$SCALAR');
}