Index: openacs-4/packages/notes/sql/oracle/notes-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notes/sql/oracle/notes-create.sql,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/notes/sql/oracle/notes-create.sql 20 Apr 2001 20:51:11 -0000 1.1 +++ openacs-4/packages/notes/sql/oracle/notes-create.sql 3 May 2001 18:23:34 -0000 1.2 @@ -105,6 +105,12 @@ values (v_note_id, owner_id, title, body); + acs_permission.grant_permission( + object_id => v_note_id, + grantee_id => owner_id, + privilege => 'admin' + ); + return v_note_id; end new; @@ -113,6 +119,9 @@ ) is begin + delete from acs_permissions + where object_id = note.delete.note_id; + delete from notes where note_id = note.delete.note_id;