Index: openacs-4/packages/acs-core-docs/www/files/note-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-core-docs/www/files/note-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-core-docs/www/files/note-procs.tcl	11 Nov 2003 14:26:38 -0000	1.1
+++ openacs-4/packages/acs-core-docs/www/files/note-procs.tcl	4 Feb 2004 14:51:28 -0000	1.2
@@ -32,13 +32,14 @@
 
 ad_proc -public mfp::note::add {
     -title:required
+    -item_id:required
 } { 
     This proc adds a note.  
 } {
     db_transaction {
-	set item_id [db_exec_plsql note_insert {
-	    select content_item__new(:title,-100,null,null,null,null,null,null,'content_item','mfp_note',:title,null,null,null,null)
-	}]
+	db_exec_plsql note_insert {
+	    select content_item__new(:title,-100,:item_id,null,null,null,null,null,'content_item','mfp_note',:title,null,null,null,null)
+	}
 
 	set revision_id [db_nextval acs_object_id_seq]