loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncreateuser.pm between versions 1.378 and 1.380

version 1.378, 2013/07/02 19:04:37	version 1.380, 2013/07/15 16:13:21
Line 219 END_SCRIPT	Line 219 END_SCRIPT
' <td><span class="LC_nobreak">'.$lt{'chqu'}.	' <td><span class="LC_nobreak">'.$lt{'chqu'}.
': <label>'.	': <label>'.
'<input type="radio" name="custom_'.$name.'quota" id="custom_'.$name.'quota_off" '.	'<input type="radio" name="custom_'.$name.'quota" id="custom_'.$name.'quota_off" '.
'value="0" '.$custom_off.' onchange="javascript:quota_changes('."'custom','$name'".')"'.	'value="0" '.$custom_off.' onchange="javascript:quota_changes('."'custom','$name'".');"'.
' />'.$lt{'defa'}.' ('.$defquota.' Mb).</label> '.	' />'.$lt{'defa'}.' ('.$defquota.' Mb).</label> '.
' <label><input type="radio" name="custom_'.$name.'quota" id="custom_'.$name.'quota_on" '.	' <label><input type="radio" name="custom_'.$name.'quota" id="custom_'.$name.'quota_on" '.
'value="1" '.$custom_on.' onchange="javascript:quota_changes('."'custom'".')";'.	'value="1" '.$custom_on.' onchange="javascript:quota_changes('."'custom','$name'".');"'.
' />'.$lt{'cust'}.':</label> '.	' />'.$lt{'cust'}.':</label> '.
'<input type="text" name="'.$name.'quota" size ="5" value="'.	'<input type="text" name="'.$name.'quota" id="'.$name.'quota" size ="5" '.
$showquota.'" onfocus="javascript:quota_changes('."'quota','$name'".')"'.	'value="'.$showquota.'" onfocus="javascript:quota_changes('."'quota','$name'".');"'.
' /> Mb</span></td>'."\n".	' /> Mb</span></td>'."\n".
&Apache::loncommon::end_data_table_row()."\n";	&Apache::loncommon::end_data_table_row()."\n";
}	}
Line 988 ENDSCRIPT	Line 988 ENDSCRIPT
$r->print('</h3>');	$r->print('</h3>');
}	}
}	}
$r->print('<form name="usersrchform" method="post">'.	$r->print('<form name="usersrchform" method="post" action="">'.
&Apache::loncommon::start_data_table()."\n".	&Apache::loncommon::start_data_table()."\n".
&Apache::loncommon::start_data_table_header_row()."\n".	&Apache::loncommon::start_data_table_header_row()."\n".
' <th> </th>'."\n");	' <th> </th>'."\n");
Line 4124 sub custom_role_editor {	Line 4124 sub custom_role_editor {
$r->print('<br clear="all" />');	$r->print('<br clear="all" />');

$r->print(<<ENDCCF);	$r->print(<<ENDCCF);
<form name="form1" method="post">	<form name="form1" method="post" action="">
<input type="hidden" name="phase" value="set_custom_roles" />	<input type="hidden" name="phase" value="set_custom_roles" />
<input type="hidden" name="rolename" value="$rolename" />	<input type="hidden" name="rolename" value="$rolename" />
ENDCCF	ENDCCF
Line 4320 sub set_custom_role {	Line 4320 sub set_custom_role {
$env{'user.name'},	$env{'user.name'},
$rolename,undef,undef,undef,$context));	$rolename,undef,undef,undef,$context));
}	}
$r->print('<p><a href="javascript:backPage(document.customresult,'."'pickrole'".')">'.&mt('Create or edit another custom role').'</a></p><form name="customresult" method="post">');	$r->print(
$r->print(&Apache::lonhtmlcommon::echo_form_input([]).'</form>');	'<p><a href="javascript:backPage(document.customresult,'."'pickrole'".')">'
	.&mt('Create or edit another custom role')
	.'</a></p>'
	.'<form name="customresult" method="post" action="">'
	.&Apache::lonhtmlcommon::echo_form_input([]).'</form>'
	);
}	}

# ================================================================ Main Handler	# ================================================================ Main Handler

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.378
changed lines
	Added in v.1.380