Index: openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl,v
diff -u -N -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl	19 Jul 2005 21:28:33 -0000	1.1.2.1
+++ openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl	30 Jan 2006 16:55:47 -0000	1.1.2.2
@@ -45,3 +45,15 @@
     set result "lors merge is done"
     return $result
 }
+
+
+ad_proc -public -callback imsld::import -impl lors {} {
+    this is the imsld lors importer
+} {
+	if {$res_type == "imscp_xmlv1p0"} {
+	    return [lorsm::imscp::register_xml_object_id \
+			-xml_file $tmp_dir/$res_href \
+			-community_id $community_id]
+	}
+}
+