Skip to content

Commit

Permalink
[spec] S12-role/basic.t: fixed POD
Browse files Browse the repository at this point in the history
git-svn-id: http://svn.pugscode.org/pugs@21507 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information
moritz committed Jul 24, 2008
1 parent 8c1e27c commit 7b86856
Showing 1 changed file with 3 additions and 2 deletions.
5 changes: 3 additions & 2 deletions S12-role/basic.t
Expand Up @@ -4,11 +4,11 @@ use Test;

plan 20;

=pod
=begin description
Basic role tests from L<S12/Roles>
=cut
=end description

# L<S12/Roles>
# Basic definition
Expand Down Expand Up @@ -45,6 +45,7 @@ ok $baz ~~ Baz, 'smartmatch said our $baz now does Foo';
}

# L<S12/Roles/Roles may have attributes:>
#?rakudo skip 'role parse failure'
{
role B { has $.attr = 42 is rw }
my Foo $b does B .= new();
Expand Down

0 comments on commit 7b86856

Please sign in to comment.