/[Frey]/trunk/lib/Frey/PPI.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/PPI.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 369 by dpavlin, Mon Nov 17 14:37:48 2008 UTC revision 455 by dpavlin, Wed Nov 19 15:28:23 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 ) ) || die $!;                  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;
26          },          },
# Line 70  sub includes { Line 70  sub includes {
70          return $include;          return $include;
71  }  }
72    
73  sub data {  sub as_data {
74          my $self = shift;          my $self = shift;
75          return {          return {
76                  includes => $self->includes,                  includes => $self->includes,
Legend:
Removed from v.369  
changed lines
  Added in v.455
  ViewVC Help
Powered by ViewVC 1.1.26