Index: openacs-4/packages/assessment/tcl/as-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-procs.tcl,v
diff -u -r1.14.2.3 -r1.14.2.4
--- openacs-4/packages/assessment/tcl/as-item-procs.tcl	27 Jan 2006 09:41:09 -0000	1.14.2.3
+++ openacs-4/packages/assessment/tcl/as-item-procs.tcl	22 Feb 2006 00:43:11 -0000	1.14.2.4
@@ -161,14 +161,17 @@
     -title:required
     {-description ""}
     {-field_name ""}
+    {-package_id ""}
 } {
     @author Timo Hentschel (timo@timohentschel.de)
     @creation-date 2004-12-07
 
     Copies an item in the database
 } {
     # Update as_item in the CR (and as_items table) getting the revision_id (as_item_id)
-    set package_id [ad_conn package_id]
+    if { ![exists_and_not_null package_id] } {
+    	set package_id [ad_conn package_id]
+    }
     set folder_id [as::assessment::folder_id -package_id $package_id]
 
     db_transaction {