[LON-CAPA-cvs] cvs: loncom /interface lonmeta.pm
raeburn
raeburn@source.lon-capa.org
Sat, 13 Dec 2008 21:10:14 -0000
raeburn Sat Dec 13 21:10:14 2008 EDT
Modified files:
/loncom/interface lonmeta.pm
Log:
- Less risk of typos.
Index: loncom/interface/lonmeta.pm
diff -u loncom/interface/lonmeta.pm:1.220 loncom/interface/lonmeta.pm:1.221
--- loncom/interface/lonmeta.pm:1.220 Sat Dec 13 19:44:52 2008
+++ loncom/interface/lonmeta.pm Sat Dec 13 21:10:14 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Metadata display handler
#
-# $Id: lonmeta.pm,v 1.220 2008/12/13 19:44:52 raeburn Exp $
+# $Id: lonmeta.pm,v 1.221 2008/12/13 21:10:14 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -164,7 +164,7 @@
my $val=int($value*10.+0.5)-10;
my $output='<table border="0" cellpadding="0" cellspacing="0"><tr>';
if ($val>=20) {
- $output.='<td width="20" bgcolor="#555555"> </td>';
+ $output.='<td width="20" bgcolor="#555555">'.(' ' x2).'</td>';
} else {
$output.='<td width="'.($val).'" bgcolor="#555555"> </td>'.
'<td width="'.(20-$val).'" bgcolor="#FF3333"> </td>';
@@ -174,7 +174,7 @@
$output.='<td width="'.($val-20).'" bgcolor="#33FF33"> </td>'.
'<td width="'.(40-$val).'" bgcolor="#555555"> </td>';
} else {
- $output.='<td width="20" bgcolor="#555555"> </td>';
+ $output.='<td width="20" bgcolor="#555555">'.(' ' x2).'</td>';
}
$output.='<td> ('.sprintf("%5.2f",$value).') </td></tr></table>';
return $output;