version 1.81, 2011/03/26 20:04:15
|
version 1.82, 2011/03/26 22:37:47
|
Line 464 sub outputCategories {
|
Line 464 sub outputCategories {
|
'<input type="submit" name="storechanges" value="'.&mt("Save changes to grading categories").'" />'. |
'<input type="submit" name="storechanges" value="'.&mt("Save changes to grading categories").'" />'. |
'<script>function storecmd (cmd) { document.quickform.cmd.value=cmd; document.quickform.submit(); }</script>'); |
'<script>function storecmd (cmd) { document.quickform.cmd.value=cmd; document.quickform.submit(); }</script>'); |
} |
} |
|
# |
|
# Debug |
|
# |
|
# my %data=&dumpdata($navmap); |
|
# foreach (keys(%data)) { |
|
# $r->print("\n<br />".$_.'='.$data{$_}); |
|
# } |
|
} |
|
|
|
# |
|
# Get data for all symbs |
|
# |
|
|
|
sub dumpdata { |
|
my ($navmap)=@_; |
|
my %returndata=(); |
|
|
|
# Run through the map and get all data |
|
|
|
my $iterator = $navmap->getIterator(undef, undef, undef, 1); |
|
my $depth = 1; |
|
$iterator->next(); # ignore first BEGIN_MAP |
|
my $curRes = $iterator->next(); |
|
|
|
while ($depth > 0) { |
|
if ($curRes == $iterator->BEGIN_MAP()) {$depth++;} |
|
if ($curRes == $iterator->END_MAP()) { $depth--; } |
|
if (ref($curRes) && $curRes->is_map()) { |
|
$returndata{$curRes->symb()}=$curRes->{DATA}->{CHILD_PARTS}.':'.$curRes->{DATA}->{CHILD_ATTEMPTED}.':'.$curRes->{DATA}->{CHILD_CORRECT}; |
|
} |
|
$curRes = $iterator->next(); |
|
} |
|
return %returndata; |
} |
} |
|
|
# |
# |
Line 610 ENDMOVE
|
Line 643 ENDMOVE
|
} |
} |
$r->print('</ul>'); |
$r->print('</ul>'); |
if ($cangrade) { |
if ($cangrade) { |
$r->print('<br />'.&mt('Add Problem or Sequence').'<br />'. |
$r->print('<br />'.&mt('Add Problem or Folder').'<br />'. |
&Apache::lonstathelpers::problem_selector('.',undef,1,1,'addcont_'.$id.'_',1,'this.form.cmd.value="addcont_'.$id.'";this.form.submit();')); |
&Apache::lonstathelpers::problem_selector('.',undef,1,1,'addcont_'.$id.'_',1,'this.form.cmd.value="addcont_'.$id.'";this.form.submit();')); |
} |
} |
$r->print('</td>'); |
$r->print('</td>'); |