--- loncom/homework/caparesponse/caparesponse.pm	2000/09/11 21:30:16	1.2
+++ loncom/homework/caparesponse/caparesponse.pm	2000/09/13 20:36:47	1.4
@@ -1,10 +1,22 @@
-# This file was automatically generated by SWIG
-package caparesponse;
-require Exporter;
-require DynaLoader;
-@ISA = qw(Exporter DynaLoader);
-package caparesponse;
-bootstrap caparesponse;
-var_caparesponse_init();
-@EXPORT = qw( );
+# The LearningOnline Network with CAPA
+# caparesponse definition
+
+package Apache::caparesponse;
+use strict;
+use capa;
+
+sub BEGIN {
+  &Apache::lonxml::register('Apache::caparesponse',('caparesponse'));
+}
+
+sub start_caparesponse {
+  print "real caparesponse<br>";
+}
+
+sub end_caparesponse {
+  print "real end caparesponse<br>";
+}
+
 1;
+__END__
+