[LON-CAPA-cvs] cvs: loncom /homework inputtags.pm /interface loncommon.pm
albertel
lon-capa-cvs-allow@mail.lon-capa.org
Mon, 16 Apr 2007 23:15:48 -0000
albertel Mon Apr 16 19:15:48 2007 EDT
Modified files:
/loncom/interface loncommon.pm
/loncom/homework inputtags.pm
Log:
- bug2622, more like the data table
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.523 loncom/interface/loncommon.pm:1.524
--- loncom/interface/loncommon.pm:1.523 Mon Apr 16 18:50:44 2007
+++ loncom/interface/loncommon.pm Mon Apr 16 19:15:42 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.523 2007/04/16 22:50:44 albertel Exp $
+# $Id: loncommon.pm,v 1.524 2007/04/16 23:15:42 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -4278,21 +4278,13 @@
}
table.LC_prior_tries {
- border-width: 1px;
- border-style: solid;
- border-color: gray;
- border-collapse: collapse;
+ border: 1px solid #000000;
+ border-collapse: separate;
+ border-spacing: 1px;
}
table.LC_prior_tries td {
- border-width: 1px;
- border-style: solid;
- border-color: gray;
- padding: 3px;
-}
-table.LC_prior_tries tr.LC_correct {
- font-weight: bold;
- background: #aaffaa;
+ padding: 2px;
}
.LC_answer_correct {
@@ -4333,8 +4325,7 @@
border-collapse: collapse;
}
table.LC_prior_option tr td {
- border-style: solid;
- border-width: 1px
+ border: 1px solid #000000;
}
span.LC_nobreak {
@@ -4383,7 +4374,7 @@
my $bgcolor = $args->{'bgcolor'} || &designparm($function.'.pgbg',$domain);
my $url = join(':',$env{'user.name'},$env{'user.domain'},
$Apache::lonnet::perlvar{'lonVersion'},
- #time(),
+ time(),
$env{'environment.color.timestamp'},
$function,$domain,$bgcolor);
Index: loncom/homework/inputtags.pm
diff -u loncom/homework/inputtags.pm:1.221 loncom/homework/inputtags.pm:1.222
--- loncom/homework/inputtags.pm:1.221 Mon Apr 16 18:50:41 2007
+++ loncom/homework/inputtags.pm Mon Apr 16 19:15:48 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# input definitons
#
-# $Id: inputtags.pm,v 1.221 2007/04/16 22:50:41 albertel Exp $
+# $Id: inputtags.pm,v 1.222 2007/04/16 23:15:48 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1211,7 +1211,7 @@
}
return if ($output eq '');
my $headers =
- '<tr>'.'<th>'.&mt('Submission #').'</th><th>'.&mt(' ').
+ '<tr>'.'<th>'.&mt('Submission #').'</th><th>'.&mt('Try').
'</th><th colspan="'.scalar(@Apache::inputtags::response).'">'.
&mt('Submitted Answer').'</th>';
$output ='<table class="LC_prior_tries">'.$headers.$output.'</table>';