version 1.160.6.84.2.1, 2017/06/22 02:11:25
|
version 1.160.6.84.6.1, 2020/04/06 21:56:01
|
Line 27
|
Line 27
|
# |
# |
# |
# |
############################################################### |
############################################################### |
############################################################### |
############################################################## |
|
|
=pod |
=pod |
|
|
Line 6208 sub print_scantronformat {
|
Line 6208 sub print_scantronformat {
|
if (ref($settings) eq 'HASH') { |
if (ref($settings) eq 'HASH') { |
if ($settings->{'scantronformat'} eq "/res/$dom/$confname/scantron/custom.tab") { |
if ($settings->{'scantronformat'} eq "/res/$dom/$confname/scantron/custom.tab") { |
my @info = &Apache::lonnet::stat_file($settings->{'scantronformat'}); |
my @info = &Apache::lonnet::stat_file($settings->{'scantronformat'}); |
if (0 && ((!@info) || ($info[0] eq 'no_such_dir'))) { |
if ((!@info) || ($info[0] eq 'no_such_dir')) { |
$scantronurl = ''; |
$scantronurl = ''; |
} else { |
} else { |
$scantronurl = $settings->{'scantronformat'}; |
$scantronurl = $settings->{'scantronformat'}; |
Line 9207 sub modify_ltitools {
|
Line 9207 sub modify_ltitools {
|
} |
} |
if ($env{'form.ltitools_add_image.filename'} ne '') { |
if ($env{'form.ltitools_add_image.filename'} ne '') { |
my ($imageurl,$error) = |
my ($imageurl,$error) = |
&process_ltitools_image($r,$dom,$confname,'ltitools_add_image',$dom, |
&process_ltitools_image($r,$dom,$confname,'ltitools_add_image',$newid, |
$configuserok,$switchserver,$author_ok); |
$configuserok,$switchserver,$author_ok); |
if ($imageurl) { |
if ($imageurl) { |
$confhash{$newid}{'image'} = $imageurl; |
$confhash{$newid}{'image'} = $imageurl; |