Index: openacs-4/packages/imsld/tcl/imsld-cp-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-cp-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/imsld/tcl/imsld-cp-procs.tcl 19 Sep 2005 17:20:15 -0000 1.2 +++ openacs-4/packages/imsld/tcl/imsld-cp-procs.tcl 15 Nov 2005 17:20:24 -0000 1.3 @@ -148,6 +148,7 @@ {-user_id ""} {-creation_ip ""} {-creation_date ""} + {-acs_object_id ""} {-parent_id ""} -edit:boolean } { @@ -162,6 +163,7 @@ @option user_id user that adds the resource. [ad_conn user_id] used by default. @option creation_ip ip-address of the user that adds the resource. [ad_conn peeraddr] used by default. @option creation_date Creation date of the resource. [dt_sysdate] used by default. + @option acs_object_id object_id of the objec resource @param parent_id Identifier of the parent folder @option edit Are we editing the resource? } { @@ -203,6 +205,7 @@ -attributes [list [list manifest_id $manifest_id] \ [list identifier $identifier] \ [list type $type] \ + [list acs_object_id $acs_object_id] \ [list href $href]]] return $item_id