/[Sack]/trunk/lib/Sack/Lorry.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/Sack/Lorry.pm

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

revision 95 by dpavlin, Sat Oct 3 21:43:34 2009 UTC revision 96 by dpavlin, Sun Oct 4 12:50:10 2009 UTC
# Line 23  sub new { Line 23  sub new {
23  sub start_node {  sub start_node {
24          my ( $self, $host ) = @_;          my ( $self, $host ) = @_;
25    
26            system "rsync -rav /srv/Sack/ $host:/srv/Sack/";
27    
28          if ( my $pid = fork ) {          if ( my $pid = fork ) {
29                  # parent                  # parent
30                  $pids->{ $host } = $pid;                  $pids->{ $host } = $pid;
# Line 68  sub start_node { Line 70  sub start_node {
70                  | : '';                  | : '';
71    
72                  $cmd .= qq|                  $cmd .= qq|
73                          perl -I/srv/Sack/lib -MSack::Node -e "Sack::Node->new($port)"                          /srv/Sack/bin/node.pl $port
74                  |;                  |;
75    
76                  $cmd =~ s{\s+}{ }sg;                  $cmd =~ s{\s+}{ }sg;
Legend:
Removed from v.95  
changed lines
  Added in v.96
  ViewVC Help
Powered by ViewVC 1.1.26