/[Frey]/trunk/lib/Frey/MapReduce.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/MapReduce.pm

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

revision 971 by dpavlin, Fri Dec 12 18:01:48 2008 UTC revision 972 by dpavlin, Fri Jan 9 19:33:26 2009 UTC
# Line 21  sub as_markup { Line 21  sub as_markup {
21          my $introspect;          my $introspect;
22    
23          my @files = map {          my @files = map {
24                  my $class = $_;                  my $path = $_;
                 my $path = $self->path . '/' . $_;  
25                  my $data = LoadFile( $path );                  my $data = LoadFile( $path );
26                  $data = [ keys %{ $data->{ 'runnable' } } ];                  $data = [ keys %{ $data->{ 'runnable' } } ];
27    
28                  $class =~ s{\.ya?ml$}{};                  my $class = $path;
29                    $class =~ s{^(.*/)?([^/]+)\.ya?ml$}{$2};
30                  $introspect->{ $class } = $data;                  $introspect->{ $class } = $data;
31                  $_;                  $_;
32          } $self->dir_extension( $self->path, '\.(ya?ml)$' );          } $self->dir_extension( $self->path, qr{\.(ya?ml)$} );
33    
34          warn "# introspect ", $self->dump( $introspect );          warn "# introspect ", $self->dump( $introspect );
35    
Legend:
Removed from v.971  
changed lines
  Added in v.972
  ViewVC Help
Powered by ViewVC 1.1.26