version 1.109, 2010/04/14 14:15:15
|
version 1.110, 2010/08/07 19:23:51
|
Line 386 ENDSCRIPT
|
Line 386 ENDSCRIPT
|
$r->print('<form method="post" action="">'. |
$r->print('<form method="post" action="">'. |
'<input type="hidden" name="forceedit" value="edit" />'); |
'<input type="hidden" name="forceedit" value="edit" />'); |
} |
} |
my @htmlids=(); |
|
my $url_include_handler = sub { |
my $url_include_handler = sub { |
my ($r, $field, $message, $group, $data_ref, $fields_ref, $target, $allowed) = @_; |
my ($r, $field, $message, $group, $data_ref, $fields_ref, $target, $allowed) = @_; |
my %data = %{$data_ref}; |
my %data = %{$data_ref}; |
Line 428 ENDSCRIPT
|
Line 427 ENDSCRIPT
|
} |
} |
}; |
}; |
my %custom_hash = ( 'lll_includeurl' => $url_include_handler ); |
my %custom_hash = ( 'lll_includeurl' => $url_include_handler ); |
@htmlids = &Apache::lontemplate::print_template_fields($r, \%syllabus, \%syllabusfields, |
&Apache::lontemplate::print_template_fields($r, \%syllabus, \%syllabusfields, |
$target, $allowed, Apache::lontemplate->RICH_TEXT_DETECT_HTML, \%custom_hash); |
$target, $allowed, Apache::lontemplate->RICH_TEXT_DETECT_HTML, \%custom_hash); |
if ($allowed) { |
if ($allowed) { |
$r->print('</form>'. |
$r->print('</form>'. |
&Apache::lonhtmlcommon::htmlareaselectactive(@htmlids)); |
&Apache::lonhtmlcommon::htmlareaselectactive()); |
} |
} |
} else { |
} else { |
if ($target ne 'tex') {$r->print('<p>');} else {$r->print('\par ');} |
if ($target ne 'tex') {$r->print('<p>');} else {$r->print('\par ');} |