Log Message:
-----------
(1) problem numbers are left alligned
(2) problem values are listed
(3) no special message is given if problem value is 0
Modified Files:
--------------
webwork-modperl/lib/WeBWorK/ContentGenerator:
ProblemSet.pm
Revision Data
-------------
Index: ProblemSet.pm
===================================================================
RCS file: /webwork/cvs/system/webwork-modperl/lib/WeBWorK/ContentGenerator/ProblemSet.pm,v
retrieving revision 1.60
retrieving revision 1.61
diff -Llib/WeBWorK/ContentGenerator/ProblemSet.pm -Llib/WeBWorK/ContentGenerator/ProblemSet.pm -u -r1.60 -r1.61
--- lib/WeBWorK/ContentGenerator/ProblemSet.pm
+++ lib/WeBWorK/ContentGenerator/ProblemSet.pm
@@ -278,6 +278,7 @@
CGI::th("Name"),
CGI::th("Attempts"),
CGI::th("Remaining"),
+ CGI::th("Worth"),
CGI::th("Status"),
);
@@ -365,14 +366,17 @@
$status = 'unknown(FIXME)' if $@; # use a blank if problem status was not defined or not numeric.
# FIXME -- this may not cover all cases.
- my $msg = ($problem->value) ? "" : "(This problem will not count towards your grade.)";
+# my $msg = ($problem->value) ? "" : "(This problem will not count towards your grade.)";
- return CGI::Tr(CGI::td({-nowrap=>1, -align=>"center"}, [
- $interactive,
- $attempts,
- $remaining,
- $status . " " . $msg,
- ]));
+ return CGI::Tr(
+ CGI::td({-nowrap=>1, -align=>"left"},$interactive),
+ CGI::td({-nowrap=>1, -align=>"center"},
+ [
+ $attempts,
+ $remaining,
+ $problem->value,
+ $status,
+ ]));
}
1;
|
