projects
/
gitmo/Moo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
remove multi-populate code to fix exists/defined new() bug
[gitmo/Moo.git]
/
t
/
undef-bug.t
diff --git a/t/undef-bug.t
b/t/undef-bug.t
new file mode 100644
(file)
index 0000000..
c3ed934
--- /dev/null
+++ b/
t/undef-bug.t
@@ -0,0
+1,13
@@
+use Test::More tests => 1;
+
+package Foo;
+use Moo;
+
+has this => (is => 'ro');
+
+package main;
+
+my $foo = Foo->new;
+
+ok not(exists($foo->{this})),
+ "new objects don't have undef attributes";