Index: openacs-4/packages/lors/tcl/lors-imscp-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors/tcl/lors-imscp-procs.tcl,v
diff -u -r1.4.2.2 -r1.4.2.3
--- openacs-4/packages/lors/tcl/lors-imscp-procs.tcl	26 Apr 2005 16:49:12 -0000	1.4.2.2
+++ openacs-4/packages/lors/tcl/lors-imscp-procs.tcl	27 May 2005 15:16:54 -0000	1.4.2.3
@@ -190,6 +190,7 @@
     {-community_id ""}
     {-user_id ""}
     {-creation_ip ""}
+    {-course_presentation_format "-1"}
 
 } {
     Inserts a new manifest according to the imsmanifest.xml file.
@@ -208,6 +209,7 @@
     @option community_id Community ID
     @option user_id user that adds the category. [ad_conn user_id] used by default.
     @option creation_ip ip-address of the user that adds the category. [ad_conn peeraddr] used by default.
+    @option course_presentation_format course presentation format ID
     @author Ernie Ghiglione (ErnieG@mm.st)
 } {
    if {[empty_string_p $user_id]} {
@@ -246,7 +248,8 @@
                                     :creation_ip,
                                     :package_id,
                                     :community_id,
-                                    :class_key
+                                    :class_key,
+				    :course_presentation_format
                                     );
 
         }