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

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

revision 455 by dpavlin, Tue Nov 18 23:57:56 2008 UTC revision 456 by dpavlin, Wed Nov 19 15:35:34 2008 UTC
# Line 86  sub main { Line 86  sub main {
86    
87                  my $f;                  my $f;
88    
                 my $run_regexp = join('|', Frey::Run->runnable );  
89                  my $editor = Frey::Editor->new;                  my $editor = Frey::Editor->new;
90    
91                  # shared run params                  # shared run params
# Line 109  sub main { Line 108  sub main {
108                          system( $editor->command( $path ) );                          system( $editor->command( $path ) );
109                          return;                          return;
110                  } elsif (                  } elsif (
111                          $path =~ m{/([^/]+)/($run_regexp)/?([^/]+)?}                          $path =~ m{/([^/]+)/(as_\w+)/?([^/]+)?}
112                  ) {                  ) {
113                          my $class = rest2class $1;                          my $class = rest2class $1;
114                          warn "# run $path -> $class $2";                          warn "# run $path -> $class $2";
Legend:
Removed from v.455  
changed lines
  Added in v.456
  ViewVC Help
Powered by ViewVC 1.1.26