version 1.77, 2004/04/27 15:32:45
|
version 1.83, 2004/06/02 17:30:02
|
Line 2090 sub render {
|
Line 2090 sub render {
|
for (i=0; i<document.forms.helpform.elements.length; i++) { |
for (i=0; i<document.forms.helpform.elements.length; i++) { |
comp = document.forms.helpform.elements.chksec.value; |
comp = document.forms.helpform.elements.chksec.value; |
if (document.forms.helpform.elements[i].value.indexOf(':'+comp+':') != -1) { |
if (document.forms.helpform.elements[i].value.indexOf(':'+comp+':') != -1) { |
document.forms.helpform.elements[i].checked=value; |
if (document.forms.helpform.elements[i].value.indexOf(':Active') != -1) { |
|
document.forms.helpform.elements[i].checked=value; |
|
} |
} |
} |
} |
} |
} |
} |
Line 2098 sub render {
|
Line 2100 sub render {
|
for (i=0; i<document.forms.helpform.elements.length; i++) { |
for (i=0; i<document.forms.helpform.elements.length; i++) { |
if (document.forms.helpform.elements[i].value.indexOf(':Active') != -1) { |
if (document.forms.helpform.elements[i].value.indexOf(':Active') != -1) { |
document.forms.helpform.elements[i].checked=true; |
document.forms.helpform.elements[i].checked=true; |
} |
} |
|
} |
|
} |
|
function uncheckexpired() { |
|
for (i=0; i<document.forms.helpform.elements.length; i++) { |
|
if (document.forms.helpform.elements[i].value.indexOf(':Expired') != -1) { |
|
document.forms.helpform.elements[i].checked=false; |
|
} |
} |
} |
} |
} |
</script> |
</script> |
Line 2106 SCRIPT
|
Line 2115 SCRIPT
|
|
|
my %lt=&Apache::lonlocal::texthash( |
my %lt=&Apache::lonlocal::texthash( |
'ocs' => "Select Only Current Students", |
'ocs' => "Select Only Current Students", |
|
'ues' => "Unselect Expired Students", |
'sas' => "Select All Students", |
'sas' => "Select All Students", |
'uas' => "Unselect All Students", |
'uas' => "Unselect All Students", |
'sfsg' => "Select for Section/Group", |
'sfsg' => "Select Current Students for Section/Group", |
'ufsg' => "Unselect for Section/Group"); |
'ufsg' => "Unselect for Section/Group"); |
|
|
$buttons = <<BUTTONS; |
$buttons = <<BUTTONS; |
<br /> |
<br /> |
<input type="button" onclick="checkactive()" value="$lt{'ocs'}" /> |
<input type="button" onclick="checkactive()" value="$lt{'ocs'}" /> |
|
<input type="button" onclick="uncheckexpired()" value="$lt{'ues'}" /><br /> |
<input type="button" onclick="checkall(true, '$var')" value="$lt{'sas'}" /> |
<input type="button" onclick="checkall(true, '$var')" value="$lt{'sas'}" /> |
<input type="button" onclick="checkall(false, '$var')" value="$lt{'uas'}" /> |
<input type="button" onclick="checkall(false, '$var')" value="$lt{'uas'}" /><br /> |
<input type="button" onclick="checksec(true)" value="$lt{'sfsg'}"> |
<input type="button" onclick="checksec(true)" value="$lt{'sfsg'}"> |
<input type="text" size="5" name="chksec"> |
<input type="text" size="5" name="chksec"> |
<input type="button" onclick="checksec(false)" value="$lt{'ufsg'}"> |
<input type="button" onclick="checksec(false)" value="$lt{'ufsg'}"> |
Line 2790 be able to call methods on it.
|
Line 2801 be able to call methods on it.
|
|
|
=cut |
=cut |
|
|
|
use Apache::lonlocal; |
|
|
BEGIN { |
BEGIN { |
&Apache::lonhelper::register('Apache::lonhelper::general', |
&Apache::lonhelper::register('Apache::lonhelper::general', |
'exec', 'condition', 'clause', |
'exec', 'condition', 'clause', |
Line 3114 sub render {
|
Line 3127 sub render {
|
my $title = $res->compTitle(); |
my $title = $res->compTitle(); |
$symb = $res->symb(); |
$symb = $res->symb(); |
$navmap->untieHashes(); |
$navmap->untieHashes(); |
$resourceString .= &mt('<li>for the map named <b>[_1]</b></li>',$title); |
$resourceString .= '<li>'.&mt('for the map named [_1]',"<b>$title</b>").'</li>'; |
$level = 8; |
$level = 8; |
$affectedResourceId = $vars->{RESOURCE_ID}; |
$affectedResourceId = $vars->{RESOURCE_ID}; |
$paramlevel = 'map'; |
$paramlevel = 'map'; |
Line 3124 sub render {
|
Line 3137 sub render {
|
$symb = $res->symb(); |
$symb = $res->symb(); |
my $title = $res->compTitle(); |
my $title = $res->compTitle(); |
$navmap->untieHashes(); |
$navmap->untieHashes(); |
$resourceString .= &mt('<li>for the resource named <b>[_1]</b></li>',$title); |
$resourceString .= '<li>'.&mt('for the resource named [_1]',"<b>$title</b>").'</li>'; |
$level = 7; |
$level = 7; |
$affectedResourceId = $vars->{RESOURCE_ID}; |
$affectedResourceId = $vars->{RESOURCE_ID}; |
$paramlevel = 'full'; |
$paramlevel = 'full'; |
Line 3180 sub render {
|
Line 3193 sub render {
|
$result .= '<li>'.&mt('for <b>all students in course</b>').'</li>'; |
$result .= '<li>'.&mt('for <b>all students in course</b>').'</li>'; |
} elsif ($vars->{TARGETS} eq 'section') { |
} elsif ($vars->{TARGETS} eq 'section') { |
my $section = $vars->{SECTION_NAME}; |
my $section = $vars->{SECTION_NAME}; |
$result .= &mt('<li>for section <b>[_1]</b></li>',$section); |
$result .= '<li>'.&mt('for section [_1]',"<b>$section</b>").'</li>'; |
$level -= 3; |
$level -= 3; |
$result .= "<input type='hidden' name='csec' value='" . |
$result .= "<input type='hidden' name='csec' value='" . |
HTML::Entities::encode($section,'<>&"') . "' />\n"; |
HTML::Entities::encode($section,'<>&"') . "' />\n"; |
Line 3191 sub render {
|
Line 3204 sub render {
|
# Chop off everything after the last colon (section) |
# Chop off everything after the last colon (section) |
$username = substr($username, 0, rindex($username, ':')); |
$username = substr($username, 0, rindex($username, ':')); |
my $name = $classlist->{$username}->[6]; |
my $name = $classlist->{$username}->[6]; |
$result .= &mt('<li>for <b>[_1]</b></li>',$name); |
$result .= '<li>'.&mt('for [_1]',"<b>$name</b>").'</li>'; |
## $result .= "<li>".&mt('for [_1]',"<b>$name</b>")."</li>"; |
|
$level -= 6; |
$level -= 6; |
my ($uname, $udom) = split /:/, $vars->{USER_NAME}; |
my ($uname, $udom) = split /:/, $vars->{USER_NAME}; |
$result .= "<input type='hidden' name='uname' value='". |
$result .= "<input type='hidden' name='uname' value='". |
Line 3203 sub render {
|
Line 3215 sub render {
|
|
|
# Print value |
# Print value |
if ($vars->{ACTION_TYPE} ne 'tries' && $vars->{ACTION_TYPE} ne 'weight') { |
if ($vars->{ACTION_TYPE} ne 'tries' && $vars->{ACTION_TYPE} ne 'weight') { |
$result .= "<li>".&mt('to')." <b>" . ctime($vars->{PARM_DATE}) . "</b> (" . |
$result .= '<li>'.&mt('to [_1] ([_2])',"<b>".ctime($vars->{PARM_DATE})."</b>",Apache::lonnavmaps::timeToHumanString($vars->{PARM_DATE}))."</li>\n"; |
Apache::lonnavmaps::timeToHumanString($vars->{PARM_DATE}) |
|
. ")</li>\n"; |
|
} |
} |
|
|
# print pres_marker |
# print pres_marker |