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.4 -r1.5 --- openacs-4/packages/imsld/tcl/imsld-cp-procs.tcl 9 Dec 2005 12:01:31 -0000 1.4 +++ openacs-4/packages/imsld/tcl/imsld-cp-procs.tcl 17 Mar 2006 15:02:03 -0000 1.5 @@ -45,7 +45,7 @@ set creation_ip [expr { [empty_string_p $creation_ip] ? [ad_conn peeraddr] : $creation_ip }] set creation_date [expr { [empty_string_p $creation_date] ? [dt_sysdate] : $creation_date }] set package_id [expr { [empty_string_p $package_id] ? [ad_conn package_id] : $package_id }] - set prent_manifest_id [expr { [empty_string_p $parent_manifest_id] ? 0 : $parent_manifest_id }] + set parent_manifest_id [expr { [empty_string_p $parent_manifest_id] ? 0 : $parent_manifest_id }] set item_id [expr { [empty_string_p $item_id] ? [db_nextval "acs_object_id_seq"] : $item_id }] set content_type imsld_cp_manifest