projects
/
gitmo/Mouse.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Add a tool to import tests
[gitmo/Mouse.git]
/
t
/
100_bugs
/
005_inline_reader_bug.t
1
#!/usr/bin/perl
2
3
use strict;
4
use warnings;
5
6
use Test::More tests => 1;
7
use Test::Exception;
8
9
10
11
=pod
12
13
This was a bug, but it is fixed now. This
14
test makes sure it does not creep back in.
15
16
=cut
17
18
{
19
package Foo;
20
use Mouse;
21
22
::lives_ok {
23
has 'bar' => (
24
is => 'ro',
25
isa => 'Int',
26
lazy => 1,
27
default => 10,
28
);
29
} '... this didnt die';
30
}
31