Index: dotlrn_packages/packages/forums/tcl/forums-lams-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/dotlrn_packages/packages/forums/tcl/forums-lams-procs.tcl,v
diff -u -r1.2 -r1.3
--- dotlrn_packages/packages/forums/tcl/forums-lams-procs.tcl	12 Aug 2008 03:07:21 -0000	1.2
+++ dotlrn_packages/packages/forums/tcl/forums-lams-procs.tcl	12 Aug 2008 04:32:43 -0000	1.3
@@ -12,8 +12,8 @@
 
 namespace eval forum::lams {}
 
-ad_proc -public forum::lams::is_lams {
-    {-forum_id ""}
+ad_proc -private forum::lams::is_lams {
+    -forum_id:required
 } {
     set a forum to be a LAMS forum instance only
 } {
@@ -22,7 +22,18 @@
 
 }
 
+ad_proc -private forum::lams::update_user_id {
+    -forum_id:required
+    -user_id:required
+} {
+    set a forum to be a LAMS forum instance only
+} {
 
+    db_dml update_user_id {}
+
+}
+
+
 ad_proc -public forum::lams::clone_instance {
     -forum_id:required
     -course_id:required
@@ -66,6 +77,7 @@
 			 ]
 
     forum::lams::is_lams -forum_id $new_forum_id
+    forum::lams::update_user_id -forum_id $new_forum_id -user_id $user_id
 
     return $new_forum_id
 
@@ -124,8 +136,8 @@
 
 ad_proc -public forum::lams::import_instance {
     -file_path:required
-    -user_id
-    -course_id
+    -user_id:required
+    -course_id:required
 } {
     Import an instance of forum
 } {
@@ -156,6 +168,7 @@
 			  ]
 
     forum::lams::is_lams -forum_id $new_forum_id
+    forum::lams::update_user_id -forum_id $new_forum_id -user_id $user_id
 
     return $new_forum_id
     
Index: dotlrn_packages/packages/forums/tcl/forums-lams-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/dotlrn_packages/packages/forums/tcl/forums-lams-procs.xql,v
diff -u -r1.1 -r1.2
--- dotlrn_packages/packages/forums/tcl/forums-lams-procs.xql	6 Aug 2008 07:34:35 -0000	1.1
+++ dotlrn_packages/packages/forums/tcl/forums-lams-procs.xql	12 Aug 2008 04:32:43 -0000	1.2
@@ -16,6 +16,15 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="forum::lams::update_user_id.update_user_id">
+        <querytext>
+            update acs_objects
+             set modifying_user = :user_id,
+             creation_user = :user_id
+            where object_id = :forum_id
+        </querytext>
+    </fullquery>
+
   <fullquery name="forum::lams::get_package_instance.get_package_id">
     <querytext>
       select