# The LearningOnline Network with CAPA
# various response type definitons response definition

package Apache::response;
use strict;

sub BEGIN {
  &Apache::lonxml::register('Apache::response',('caparesponse'));
}

sub start_caparesponse {
  require Apache::caparesponse; 
  import Apache::caparesponse; 
  my ($target,$token,$parstack,$parser,$safeeval,$style)=@_;
  print "\n<br>\nsimple caparesponse\n";
  Apache::caparesponse::start_caparesponse($target,$token,$parstack,$parser,$safeeval,$style);;
}
sub end_caparesponse {
  print "\n<br>\nend caparesponse\n";
}
1;
__END__