X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-queued;h=7c4cf1b64f53809cc39ca7b4089878b09b71ce92;hb=24bdd2d7ec485534761891bd1b0c42f14c11435a;hp=4786132c62837152f59c14de6aa1c15ea00577f0;hpb=ae02d1178c6859f7a0a5e4a22c685de5f0477568;p=freeside.git diff --git a/FS/bin/freeside-queued b/FS/bin/freeside-queued index 4786132c6..7c4cf1b64 100644 --- a/FS/bin/freeside-queued +++ b/FS/bin/freeside-queued @@ -38,16 +38,15 @@ drop_root(); $ENV{HOME} = (getpwuid($>))[7]; #for ssh warn "connecting to database\n" if $DEBUG; -#$@ = 'not connected'; -#while ( $@ ) { -# eval { adminsuidsetup $user; }; -# if ( $@ ) { -# warn $@; -# warn "sleeping for reconnect...\n"; -# sleep 5; -# } -#} -adminsuidsetup $user; +$@ = 'not connected'; +while ( $@ ) { + eval { adminsuidsetup $user; }; + if ( $@ ) { + warn $@; + warn "sleeping for reconnect...\n"; + sleep 5; + } +} my $log = FS::Log->new('queue'); logfile( "%%%FREESIDE_LOG%%%/queuelog.". $FS::UID::datasrc );