--- loncom/interface/spreadsheet/assesscalc.pm 2003/05/23 21:03:29 1.9
+++ loncom/interface/spreadsheet/assesscalc.pm 2003/05/27 20:20:25 1.10
@@ -1,5 +1,5 @@
#
-# $Id: assesscalc.pm,v 1.9 2003/05/23 21:03:29 matthew Exp $
+# $Id: assesscalc.pm,v 1.10 2003/05/27 20:20:25 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -418,7 +418,7 @@ END
$r->print("\n".$tableheader);
}
$r->print('
'.$rownum.' | '.
- $self->assess_html_row($num_uneditable,$rownum)."
\n");
+ $self->assess_html_row($rownum)."\n");
}
$r->print("\n");
return;
@@ -426,7 +426,7 @@ END
sub assess_html_row {
my $self = shift();
- my ($num_uneditable,$row) = @_;
+ my ($row) = @_;
my $parameter_name = $self->{'formulas'}->{'A'.$row};
my @rowdata = $self->get_row($row);
my $num_cols_output = 0;
@@ -439,9 +439,17 @@ sub assess_html_row {
$row_html .= ''.$parameter_name.' | ';
}
foreach my $cell (@rowdata) {
- $row_html .= '';
- $row_html .= &Apache::Spreadsheet::html_editable_cell($cell,'#E0FFDD');
+ if ($num_cols_output < 1) {
+ $row_html .= ' | ';
+ $row_html .= &Apache::Spreadsheet::html_uneditable_cell($cell,
+ '#FFDDDD');
+ } else {
+ $row_html .= ' | ';
+ $row_html .= &Apache::Spreadsheet::html_editable_cell($cell,
+ '#E0FFDD',1);
+ }
$row_html .= ' | ';
+ $num_cols_output++;
}
return $row_html;
}