loncom/interface/lonrequestcourse.pm - diff

Return to lonrequestcourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.96, 2016/04/02 04:30:21	version 1.98, 2016/04/04 01:09:48
Line 3168 sub clone_form {	Line 3168 sub clone_form {
my $type = 'Course';	my $type = 'Course';
if ($crstype eq 'community') {	if ($crstype eq 'community') {
$type = 'Community';	$type = 'Community';
	} elsif ($crstype eq 'placement') {
	$type = 'Placement';
}	}
my %lt = &clone_text();	my %lt = &clone_text();
my $output .=	my $output .=
Line 3175 sub clone_form {	Line 3177 sub clone_form {
&Apache::loncommon::select_dom_form($dom,'clonedom').'</label>'.	&Apache::loncommon::select_dom_form($dom,'clonedom').'</label>'.
&Apache::lonhtmlcommon::row_closure(1).	&Apache::lonhtmlcommon::row_closure(1).
&Apache::lonhtmlcommon::row_title($lt{'cid'}).'<label>'.	&Apache::lonhtmlcommon::row_title($lt{'cid'}).'<label>'.
'<input type="text" size="25" name="clonecrs" value="" onfocus="this.blur();opencrsbrowser('."'$formname','clonecrs','clonedom','','','','','$type'".')" />'.	'<input type="text" size="25" name="clonecrs" value="" onfocus="this.blur();opencrsbrowser('."'$formname','clonecrs','clonedom','','','','$type'".')" />'.
'</label> '.	'</label> '.
&Apache::loncommon::selectcourse_link($formname,'clonecrs','clonedom','','','',$type).	&Apache::loncommon::selectcourse_link($formname,'clonecrs','clonedom','','','',$type).
&Apache::lonhtmlcommon::row_closure(1).	&Apache::lonhtmlcommon::row_closure(1).