version 1.177, 2007/04/17 15:44:58
|
version 1.179, 2007/09/10 16:07:32
|
Line 201 sub handler {
|
Line 201 sub handler {
|
} |
} |
$r->print(<<ENDENTEREDKEY); |
$r->print(<<ENDENTEREDKEY); |
$start_page |
$start_page |
<script> |
<script type="text/javascript"> |
$swinfo |
$swinfo |
</script> |
</script> |
<form method="post"> |
<form method="post"> |
Line 224 ENDENTEREDKEY
|
Line 224 ENDENTEREDKEY
|
my $end_page=&Apache::loncommon::end_page(); |
my $end_page=&Apache::loncommon::end_page(); |
$r->print(<<ENDENTERKEY); |
$r->print(<<ENDENTERKEY); |
$start_page |
$start_page |
<script> |
<script type="text/javascript"> |
$swinfo |
$swinfo |
</script> |
</script> |
<form method="post"> |
<form method="post"> |
Line 365 ENDENTERKEY
|
Line 365 ENDENTERKEY
|
my $start_page=&Apache::loncommon::start_page('User Roles'); |
my $start_page=&Apache::loncommon::start_page('User Roles'); |
my $standby=&mt('Role selected. Please stand by.'); |
my $standby=&mt('Role selected. Please stand by.'); |
$standby=~s/\n/\\n/g; |
$standby=~s/\n/\\n/g; |
|
my $noscript='<span class="LC_error">'.&mt('Use of LON-CAPA requires Javascript to be enabled in your web browser.').'<br />'.&mt('As this is not the case, most functionality in the system will ba unavailable.').'</span><br />'; |
|
|
$r->print(<<ENDHEADER); |
$r->print(<<ENDHEADER); |
$start_page |
$start_page |
<br /> |
<br /> |
<script> |
<noscript> |
|
$noscript |
|
</noscript> |
|
<script type="text/javascript"> |
$swinfo |
$swinfo |
window.focus(); |
window.focus(); |
|
|
Line 443 ENDHEADER
|
Line 447 ENDHEADER
|
&Apache::loncommon::end_page()); |
&Apache::loncommon::end_page()); |
return OK; |
return OK; |
} else { |
} else { |
if ($advanced) { |
|
$r->print('<span class="LC_rolesinfo">'.&mt("Your home server is "). |
|
&Apache::lonnet::hostname(&Apache::lonnet::homeserver |
|
($env{'user.name'},$env{'user.domain'})). |
|
"<br />\n"); |
|
$r->print(&mt( |
|
"Author and Co-Author roles are not available on servers other than their respective home servers.").'</span>'); |
|
} |
|
if (($ENV{'REDIRECT_QUERY_STRING'}) && ($fn)) { |
if (($ENV{'REDIRECT_QUERY_STRING'}) && ($fn)) { |
$fn.='?'.$ENV{'REDIRECT_QUERY_STRING'}; |
$fn.='?'.$ENV{'REDIRECT_QUERY_STRING'}; |
} |
} |
Line 636 ENDHEADER
|
Line 632 ENDHEADER
|
# Is there only one choice? |
# Is there only one choice? |
} elsif (($countactive==1) && ($env{'request.role'} eq 'cm')) { |
} elsif (($countactive==1) && ($env{'request.role'} eq 'cm')) { |
$r->print('<h3>'.&mt('Please stand by.').'</h3>'. |
$r->print('<h3>'.&mt('Please stand by.').'</h3>'. |
'<input type="hidden" name="'.$possiblerole.'" value="1" />'); |
'<input type="hidden" name="'.$possiblerole.'" value="1" />'. |
|
'<noscript><br /><input type="submit" name="submit" value="'.&mt('Continue').'" /></noscript>'); |
$r->print("</form>\n"); |
$r->print("</form>\n"); |
$r->rflush(); |
$r->rflush(); |
$r->print('<script>document.forms.rolechoice.submit();</script>'); |
$r->print('<script type="text/javascript">document.forms.rolechoice.submit();</script>'); |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
return OK; |
return OK; |
} |
} |
Line 934 sub courselink {
|
Line 931 sub courselink {
|
|
|
sub coursepick_jscript { |
sub coursepick_jscript { |
my $verify_script = <<"END"; |
my $verify_script = <<"END"; |
<script> |
<script type="text/javascript"> |
function verifyCoursePick(caller) { |
function verifyCoursePick(caller) { |
var numbutton = getIndex(caller) |
var numbutton = getIndex(caller) |
var pickedCourse = document.rolechoice.elements[numbutton+4].value |
var pickedCourse = document.rolechoice.elements[numbutton+4].value |
Line 970 END
|
Line 967 END
|
|
|
sub processpick { |
sub processpick { |
my $process_pick = <<"END"; |
my $process_pick = <<"END"; |
<script> |
<script type="text/javascript"> |
function process_pick(dom) { |
function process_pick(dom) { |
var pickedCourse=opener.document.rolechoice.$env{'form.cnumelement'}.value; |
var pickedCourse=opener.document.rolechoice.$env{'form.cnumelement'}.value; |
var pickedDomain=opener.document.rolechoice.$env{'form.cdomelement'}.value; |
var pickedDomain=opener.document.rolechoice.$env{'form.cdomelement'}.value; |