[libmoosex-semiaffordanceaccessor-perl] 04/12: Load order _does_ matter, and this is the case for all MX modules
Intrigeri
intrigeri at moszumanska.debian.org
Thu Aug 28 15:44:22 UTC 2014
This is an automated email from the git hooks/post-receive script.
intrigeri pushed a commit to annotated tag v0.06
in repository libmoosex-semiaffordanceaccessor-perl.
commit 94eaef8961a7deb80b0ed0fa6f5f5619e9c6bbd2
Author: Dave Rolsky <autarch at urth.org>
Date: Wed Jul 14 14:03:10 2010 -0500
Load order _does_ matter, and this is the case for all MX modules
---
t/basic.t | 17 -----------------
1 file changed, 17 deletions(-)
diff --git a/t/basic.t b/t/basic.t
index d67ac5e..520561c 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -17,18 +17,6 @@ use Test::More;
package SAA;
- use MooseX::SemiAffordanceAccessor;
- use Moose;
-
- has 'thing' => ( is => 'rw' );
- has '_private' => ( is => 'rw' );
-}
-
-{
-
- package SAA2;
-
- # Make sure load order doesn't matter
use Moose;
use MooseX::SemiAffordanceAccessor;
@@ -69,11 +57,6 @@ ok( SAA->can('set_thing'), 'SAA->set_thing() exists' );
ok( SAA->can('_private'), 'SAA->_private() exists' );
ok( SAA->can('_set_private'), 'SAA->_set_private() exists' );
-ok( SAA2->can('thing'), 'SAA2->thing() exists' );
-ok( SAA2->can('set_thing'), 'SAA2->set_thing() exists' );
-ok( SAA2->can('_private'), 'SAA2->_private() exists' );
-ok( SAA2->can('_set_private'), 'SAA2->_set_private() exists' );
-
ok( SAA3->can('ro'), 'SAA3->ro exists' );
ok( !SAA3->can('set_ro'), 'SAA3->set_ro does not exist' );
ok( SAA3->can('thing'), 'SAA3->thing exists' );
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmoosex-semiaffordanceaccessor-perl.git
More information about the Pkg-perl-cvs-commits
mailing list