Index: openacs-4/packages/acs-subsite/www/user/portrait/upload-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/portrait/Attic/upload-2-postgresql.xql,v diff -u -N -r1.5 -r1.6 --- openacs-4/packages/acs-subsite/www/user/portrait/upload-2-postgresql.xql 2 Jul 2004 11:49:05 -0000 1.5 +++ openacs-4/packages/acs-subsite/www/user/portrait/upload-2-postgresql.xql 13 Jan 2005 13:55:51 -0000 1.6 @@ -2,31 +2,6 @@ postgresql7.1 - - - - select content_item__new( - varchar :name, - null, - null, - null, - now(), - null, - null, - :creation_ip, - 'content_item', - 'content_revision', - null, - null, - 'text/plain', - null, - null - ) - - - - - @@ -44,61 +19,4 @@ - - - - - declare - v_revision_id integer; - begin - - v_revision_id := content_revision__new( - :title, - :portrait_comment, - now(), - :guessed_file_type, - null, - null, - :item_id, - null, - now(), - :user_id, - :creation_ip, - :n_bytes); - - update cr_items - set live_revision = v_revision_id - where item_id = :item_id; - - return v_revision_id; - - end; - - - - - - - - update cr_revisions - set lob = [set __lob_id [db_string get_lob_id "select empty_lob()"]] - where revision_id = :revision_id - - - - - - - - update cr_revisions - set description = :portrait_comment, - publish_date = now(), - mime_type = :guessed_file_type, - content_length = :n_bytes, - title = :title - where revision_id = :revision_id - - - -