Merge branch 'master' of git.rot13.org:/git/cloudstore
authorDobrica Pavlinusic <dpavlin@smtp.calyx.hr>
Tue, 23 Aug 2011 23:35:03 +0000 (01:35 +0200)
committerDobrica Pavlinusic <dpavlin@smtp.calyx.hr>
Tue, 23 Aug 2011 23:35:03 +0000 (01:35 +0200)
rsync-piper.pl

index 5751e96..fc05140 100755 (executable)
@@ -148,9 +148,11 @@ if ( ! -e $pid_file ) {
        }
 }
 
+=for gearman
 use Gearman::Client;
 my $gearman = Gearman::Client->new;
 $gearman->job_servers('127.0.0.1:4730');
+=cut
 
 while(1) {
        warn "# reading log output from $log_fifo\n";
@@ -185,7 +187,9 @@ while(1) {
 
                        my $json = CloudStore::JSON::rsync_transfer \%data;
 
+=for gearman
                        $gearman->dispatch_background( 'rsync_transfer' => $json );
+=cut
 
                }
        }