File:  [LON-CAPA] / loncom / homework / response.pm
Revision 1.1: download - view: text, annotated - select for diffs
Thu Sep 14 20:56:25 2000 UTC (23 years, 8 months ago) by albertel
Branches: MAIN
CVS tags: HEAD
- used to define the response tags

    1: # The LearningOnline Network with CAPA
    2: # various response type definitons response definition
    3: 
    4: package Apache::response;
    5: use strict;
    6: 
    7: sub BEGIN {
    8:   &Apache::lonxml::register('Apache::response',('caparesponse'));
    9: }
   10: 
   11: sub start_caparesponse {
   12:   require Apache::caparesponse; 
   13:   import Apache::caparesponse; 
   14:   my ($target,$token,$parstack,$parser,$safeeval,$style)=@_;
   15:   print "\n<br>\nsimple caparesponse\n";
   16:   Apache::caparesponse::start_caparesponse($target,$token,$parstack,$parser,$safeeval,$style);;
   17: }
   18: sub end_caparesponse {
   19:   print "\n<br>\nend caparesponse\n";
   20: }
   21: 1;
   22: __END__
   23:  

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>