Return to testbankimport.pm CVS log | Up to [LON-CAPA] / loncom / publisher |
version 1.36, 2012/12/16 19:04:35 | version 1.37, 2012/12/16 20:06:44 |
---|---|
Line 1578 sub create_ess { | Line 1578 sub create_ess { |
if (open(PROB,">$destdir$libfile")) { | if (open(PROB,">$destdir$libfile")) { |
print PROB $output; | print PROB $output; |
close(PROB); | close(PROB); |
$result = 'ok'; | |
} else { | } else { |
$result = 'failed'; | $result = 'failed'; |
} | } |