Index: openacs-4/packages/general-comments/www/comment-add-3-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/Attic/comment-add-3-postgresql.xql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/general-comments/www/comment-add-3-postgresql.xql 17 Jul 2001 19:11:32 -0000 1.2 +++ openacs-4/packages/general-comments/www/comment-add-3-postgresql.xql 31 Oct 2001 20:42:07 -0000 1.3 @@ -5,18 +5,15 @@ - declare - v_message_id integer; - begin - select acs_message__new ( + select acs_message__new ( :comment_id, -- 1 p_message_id NULL, -- 2 p_reply_to current_timestamp, -- 3 p_sent_date NULL, -- 4 p_sender NULL, -- 5 p_rfc822_id :title, -- 6 p_title NULL, -- 7 p_description - :mime_type, -- 8 p_mime_type + :comment_mime_type, -- 8 p_mime_type NULL, -- 9 p_text NULL, -- empty_blob(), -- 10 p_data 0, -- 11 p_parent_id @@ -25,12 +22,7 @@ :creation_ip, -- 14 p_creation_ip 'acs_message', -- 15 p_object_type :is_live -- 16 p_is_live - ) into v_message_id; - - return v_message_id; - - end; - + )