/[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 345 by dpavlin, Sun Nov 9 09:58:13 2008 UTC revision 346 by dpavlin, Sat Nov 15 16:29:26 2008 UTC
# Line 93  sub main { Line 93  sub main {
93                          $f = Frey::ObjectDesigner->new( fey_class => $params{class} );                          $f = Frey::ObjectDesigner->new( fey_class => $params{class} );
94                          $f->request( $req );                          $f->request( $req );
95                  } elsif (                  } elsif (
96                            $path =~ m{/editor(.+?)\+(\d+)}
97                    ) {
98                            my $editor = $ENV{VISUAL} || $ENV{EDITOR} || 'vi';
99                            my $cmd = "$editor -R +$2 $1";
100                            warn "# $path -> system $cmd";
101                            $req->print( $cmd );
102                            system( $cmd );
103                            return;
104                    } elsif (
105                          $path =~ m{/([^/]+)/($run_regexp)}                          $path =~ m{/([^/]+)/($run_regexp)}
106                  ) {                  ) {
107                          my $class = rest2class $1;                          my $class = rest2class $1;
Legend:
Removed from v.345  
changed lines
  Added in v.346
  ViewVC Help
Powered by ViewVC 1.1.26