Log Message:
-----------
Print contents of COMMENT() commands in the Library Browser.
Modified Files:
--------------
webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor:
SetMaker.pm
Revision Data
-------------
Index: SetMaker.pm
===================================================================
RCS file: /webwork/cvs/system/webwork-modperl/lib/WeBWorK/ContentGenerator/Instructor/SetMaker.pm,v
retrieving revision 1.51
retrieving revision 1.52
diff -Llib/WeBWorK/ContentGenerator/Instructor/SetMaker.pm -Llib/WeBWorK/ContentGenerator/Instructor/SetMaker.pm -u -r1.51 -r1.52
--- lib/WeBWorK/ContentGenerator/Instructor/SetMaker.pm
+++ lib/WeBWorK/ContentGenerator/Instructor/SetMaker.pm
@@ -809,6 +809,7 @@
my $problem_output = $pg->{flags}->{error_flag} ?
CGI::div({class=>"ResultsWithError"}, CGI::em("This problem produced an error"))
: CGI::div({class=>"RenderSolo"}, $pg->{body_text});
+ $problem_output .= $pg->{flags}->{comment} if($pg->{flags}->{comment});
#if($self->{r}->param('browse_which') ne 'browse_library') {
|