--- loncom/homework/externalresponse.pm 2008/02/01 22:05:45 1.13 +++ loncom/homework/externalresponse.pm 2008/11/10 13:18:19 1.14 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # external style responses # -# $Id: externalresponse.pm,v 1.13 2008/02/01 22:05:45 raeburn Exp $ +# $Id: externalresponse.pm,v 1.14 2008/11/10 13:18:19 jms Exp $ # # Copyright Michigan State University Board of Trustees # @@ -26,6 +26,22 @@ # http://www.lon-capa.org/ # +=pod + +=head1 NAME + +Apache::externalresponse.pm + +=head1 SYNOPSIS + +Handler to evaluate externally graded responses. + +This is part of the LearningOnline Network with CAPA project +described at http://www.lon-capa.org. + + +=cut + package Apache::externalresponse; use strict; use HTTP::Request::Common; @@ -36,10 +52,16 @@ BEGIN { &Apache::lonxml::register('Apache::externalresponse',('externalresponse')); } -#FIXME -# send of response params and their current values (form good enough? -# what parameters to send?) -# Need to get returned message displayed +=pod + +=head1 FIXME + +send of response params and their current values (form good enough? what parameters to send?) +Need to get returned message displayed + +=cut + + sub start_externalresponse { my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; my $result;