Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.1318, 2018/05/08 20:30:12 | version 1.1319, 2018/07/04 13:44:16 |
---|---|
Line 18024 sub make_short_symbs { | Line 18024 sub make_short_symbs { |
while (($gotlock ne 'ok') && ($tries<3)) { | while (($gotlock ne 'ok') && ($tries<3)) { |
$tries ++; | $tries ++; |
sleep 1; | sleep 1; |
$gotlock = &Apache::lonnet::newput_dom('uniquecodes',$lockhash,$cdom); | $gotlock = &Apache::lonnet::newput_dom('tiny',$lockhash,$cdom); |
} | } |
if ($gotlock eq 'ok') { | if ($gotlock eq 'ok') { |
$init = &shorten_symbs($cdom,$init,$su,\%coursetiny,\%tocreate,\%newunique, | $init = &shorten_symbs($cdom,$init,$su,\%coursetiny,\%tocreate,\%newunique, |