[system] / trunk / pg / macros / answerHints.pl Repository:
ViewVC logotype

Diff of /trunk/pg/macros/answerHints.pl

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

Revision 5555 Revision 5556
1sub _answerHints_init {} 1################################################################################
2# WeBWorK Online Homework Delivery System
3# Copyright 2000-2007 The WeBWorK Project, http://openwebwork.sf.net/
4# $CVSHeader: webwork2/lib/WeBWorK.pm,v 1.100 2007/08/13 22:59:53 sh002i Exp $
5#
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
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.
10#
11# This program is distributed in the hope that it will be useful, but WITHOUT
12# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
13# FOR A PARTICULAR PURPOSE. See either the GNU General Public License or the
14# Artistic License for more details.
15################################################################################
2 16
3=head1 AnswerHints() 17=head1 AnswerHints()
4 18
5This is an answer-checker post-filter that allows you to produce 19This is an answer-checker post-filter that allows you to produce
6additional error messages for incorrect answers. You can trigger 20additional error messages for incorrect answers. You can trigger
86 } => ["Close! Keep trying.", score => .25], 100 } => ["Close! Keep trying.", score => .25],
87 ))); 101 )));
88 102
89=cut 103=cut
90 104
105sub _answerHints_init {}
106
91sub AnswerHints { 107sub AnswerHints {
92 return (sub { 108 return (sub {
93 my $ans = shift; $ans->{_filter_name} = "Answer Hints Post Filter"; 109 my $ans = shift; $ans->{_filter_name} = "Answer Hints Post Filter";
94 my $correct = $ans->{correct_value}; 110 my $correct = $ans->{correct_value};
95 my $student = $ans->{student_value}; 111 my $student = $ans->{student_value};

Legend:
Removed from v.5555  
changed lines
  Added in v.5556

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9