--- loncom/homework/externalresponse.pm 2007/09/11 19:07:01 1.8 +++ loncom/homework/externalresponse.pm 2007/09/11 19:24:14 1.9 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # external style responses # -# $Id: externalresponse.pm,v 1.8 2007/09/11 19:07:01 albertel Exp $ +# $Id: externalresponse.pm,v 1.9 2007/09/11 19:24:14 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -74,7 +74,7 @@ sub end_externalresponse { $part,$id); %Apache::loncapagrade::results=(); $Apache::lonhomework::results{"resource.$part.$id.submission"}=$response; - if ($res->{_rc} != '200') { + if ($res->is_error()) { $Apache::loncapagrade::results{'awarddetail'}='ERROR'; } else { &Apache::lonxml::register('Apache::loncapagrade',