--- loncom/interface/Attic/lonspreadsheet.pm 2001/11/06 11:14:42 1.75
+++ loncom/interface/Attic/lonspreadsheet.pm 2001/12/27 19:37:46 1.77
@@ -7,7 +7,7 @@
# 03/05,03/08,03/10,03/12,03/13,03/15,03/17,
# 03/19,03/20,03/21,03/27,04/05,04/09,
# 07/09,07/14,07/21,09/01,09/10,9/11,9/12,9/13,9/14,9/17,
-# 10/16,10/17,10/20,11/05 Gerd Kortemeyer
+# 10/16,10/17,10/20,11/05,11/28,12/27 Gerd Kortemeyer
package Apache::lonspreadsheet;
@@ -1547,6 +1547,18 @@ sub loadassessment {
}
# ----------------------------- returnhash now has all stores for this resource
+# --------- convert all "_" to "." to be able to use libraries, multiparts, etc
+
+ my @oldkeys=keys %returnhash;
+
+ map {
+ my $name=$_;
+ my $value=$returnhash{$_};
+ delete $returnhash{$_};
+ $name=~s/\_/\./g;
+ $returnhash{$name}=$value;
+ } @oldkeys;
+
# ---------------------------- initialize coursedata and userdata for this user
undef %courseopt;
undef %useropt;
@@ -2066,6 +2078,9 @@ ENDSCRIPT
} else {
$r->print('
Section/Group: '.&getcsec($asheet));
}
+ if ($ENV{'form.usymb'}) {
+ $r->print('
Assessment: '.$ENV{'form.usymb'}.'');
+ }
}
# ---------------------------------------------------------------- Course title
@@ -2200,8 +2215,21 @@ ENDSCRIPT
} else {
$r->print('
Show empty rows: ');
}
- $r->print('print(' checked'); }
+
+ $r->print(&hiddenfield('userselhidden','true').
+ 'print(' checked');
+ } else {
+ unless ($ENV{'form.userselhidden'}) {
+ unless
+ ($ENV{'course.'.$ENV{'request.course.id'}.'.hideemptyrows'} eq 'yes') {
+ $r->print(' checked');
+ $ENV{'form.showall'}=1;
+ }
+ }
+ }
$r->print('>');
if (&gettype($asheet) eq 'classcalc') {
$r->print(
@@ -2227,3 +2255,7 @@ ENDSCRIPT
1;
__END__
+
+
+
+