[system] / branches / rel-2-1-patches / webwork-modperl / lib / WeBWorK / ContentGenerator.pm Repository:
ViewVC logotype

Diff of /branches/rel-2-1-patches/webwork-modperl/lib/WeBWorK/ContentGenerator.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 2151 Revision 2152
1################################################################################ 1################################################################################
2# WeBWorK Online Homework Delivery System 2# WeBWorK Online Homework Delivery System
3# Copyright © 2000-2003 The WeBWorK Project, http://openwebwork.sf.net/ 3# Copyright © 2000-2003 The WeBWorK Project, http://openwebwork.sf.net/
4# $CVSHeader: webwork-modperl/lib/WeBWorK/ContentGenerator.pm,v 1.98 2004/05/07 18:47:23 sh002i Exp $ 4# $CVSHeader: webwork-modperl/lib/WeBWorK/ContentGenerator.pm,v 1.99 2004/05/21 23:38:52 jj Exp $
5# 5#
6# This program is free software; you can redistribute it and/or modify it under 6# This program is free software; you can redistribute it and/or modify it under
7# the terms of either: (a) the GNU General Public License as published by the 7# the terms of either: (a) the GNU General Public License as published by the
8# Free Software Foundation; either version 2, or (at your option) any later 8# Free Software Foundation; either version 2, or (at your option) any later
9# version, or (b) the "Artistic License" which comes with this package. 9# version, or (b) the "Artistic License" which comes with this package.
… …
310 310
311 311
312sub addgoodmessage { 312sub addgoodmessage {
313 my ($self, $message) = @_; 313 my ($self, $message) = @_;
314 $self->addmessage(CGI::div({class=>"ResultsWithoutError"}, $message)); 314 $self->addmessage(CGI::div({class=>"ResultsWithoutError"}, $message));
315}
316
317=item addbadmessage($message)
318
319Adds a failure message to the list of messages to be printed by the
320message() template escape handler.
321
322=cut
323
324
325sub addbadmessage {
326 my ($self, $message) = @_;
327 $self->addmessage(CGI::div({class=>"ResultsWithError"}, $message));
315} 328}
316 329
317=back 330=back
318 331
319=cut 332=cut
Legend:
Removed from v.2151  
changed lines
  Added in v.2152
aubreyja at gmail dot com
 ViewVC Help
Powered by ViewVC 1.0.9