Index: openacs-4/packages/static-pages/tcl/static-pages-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/tcl/static-pages-procs-oracle.xql,v diff -u -r1.9.2.2 -r1.9.2.3 --- openacs-4/packages/static-pages/tcl/static-pages-procs-oracle.xql 12 Dec 2002 22:02:01 -0000 1.9.2.2 +++ openacs-4/packages/static-pages/tcl/static-pages-procs-oracle.xql 16 Dec 2002 03:22:47 -0000 1.9.2.3 @@ -40,26 +40,23 @@ - - begin - :1 := static_page.new( - filename => :sp_filename, - title => :page_title, - folder_id => :parent_folder_id - ); - end; - +begin +:1 := static_page.new( + filename => :sp_filename + ,title => :page_title + ,folder_id => :parent_folder_id + ,mime_type => :mime_type +); +end; - update cr_revisions set content = empty_blob() where revision_id = content_item.get_live_revision(:static_page_id) returning content into :1 -