← Back to branch summary

~ubuntu-branches/ubuntu/raring/libmodule-info-perl/raring

« back to all changes in this revision

Viewing changes to t/n2_safe.t

  • Committer: Bazaar Package Importer
  • Author(s): Jay Bonci
  • Date: 2007-07-03 13:02:51 UTC
  • mfrom: (1.2.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20070703130251-a3lwdwadryajtfkk
Tags: 0.31-1
* New upstream release
* Bumped policy version to 3.7.2.2 (No other changes)
* Build-Depends-Indep to Build-Depends to satisfy lintian
* Changed debian/rules so that make clean is only conditionally ignored

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/n2_safe.t
2
2
 
3
3
use strict;
4
4
use lib 't/lib';
5
 
use Test::More tests => 8;
 
5
use Test::More tests => 7;
6
6
use Module::Info;
7
7
 
8
8
my $moo = Module::Info->new_from_module( 'Moo' );
9
9
 
10
10
is( $moo->version, '0.12' );
11
11
is( $moo->safe, 0 );
12
 
isa_ok( $moo, 'Module::Info::Unsafe' );
13
12
 
14
13
my $safe_moo = Module::Info->new_from_module( 'Moo' );
15
14
$safe_moo->safe(1);
16
15
 
 
16
is( $moo->safe, 0, 'safe attribute is per-object' );
 
17
 
17
18
is( $safe_moo->safe, 1 );
18
 
isa_ok( $safe_moo, 'Module::Info::Safe' );
19
19
 
20
20
eval {
21
21
    $safe_moo->version;