166 |
if ( $getter eq $check ) { |
if ( $getter eq $check ) { |
167 |
$after .= "$check"; |
$after .= "$check"; |
168 |
} else { |
} else { |
169 |
$after .= qq{<span class="frey-popup">$check}; |
$after .= qq{<span class="frey-popdown">$check}; |
170 |
$after .= '<span>' . $attr->$getter->dump . '</span>' if $getter ne $check; |
$after .= '<code>' . $attr->$getter->dump . '</code>' if $getter ne $check; |
171 |
$after .= '</span>'; |
$after .= '</span>'; |
172 |
} |
} |
173 |
} |
} |
193 |
join(', ', |
join(', ', |
194 |
map { |
map { |
195 |
my $name = $_->meta->name; |
my $name = $_->meta->name; |
196 |
qq|<a class="frey-popup" href="/~/$name">$name<span>| . $_->meta->dump(2) . qq|</span></a>|; |
qq|<a class="frey-popdown" href="/~/$name">$name<code>| . $_->meta->dump(2) . qq|</code></a>|; |
197 |
} |
} |
198 |
#grep { $_ ne 'Moose::Object' } |
#grep { $_ ne 'Moose::Object' } |
199 |
$meta->superclasses |
$meta->superclasses |