Parent Directory | Revision Log | Patch
revision 404 by dpavlin, Tue Nov 18 10:35:27 2008 UTC | revision 414 by dpavlin, Tue Nov 18 14:15:45 2008 UTC | |
---|---|---|
# | Line 19 has 'doc' => ( | Line 19 has 'doc' => ( |
19 | lazy => 1, | lazy => 1, |
20 | default => sub { | default => sub { |
21 | my ( $self ) = @_; | my ( $self ) = @_; |
22 | warn "doc from ", $self->class; | warn "# doc from ", $self->class if $self->debug; |
23 | my $doc = PPI::Document->new( $self->class_path( $self->class ) ); | my $doc = PPI::Document->new( $self->class_path( $self->class ) ); |
24 | $doc->prune('PPI::Token::Whitespace'); | $doc->prune('PPI::Token::Whitespace'); |
25 | return $doc; | return $doc; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |