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.8 -r1.9 --- openacs-4/packages/static-pages/tcl/static-pages-procs-oracle.xql 13 Aug 2002 12:33:53 -0000 1.8 +++ openacs-4/packages/static-pages/tcl/static-pages-procs-oracle.xql 6 Sep 2002 12:02:27 -0000 1.9 @@ -8,8 +8,8 @@ begin :1 := static_page.new_folder ( - name => :directory, - label => :directory, + name => :cumulative_path, + label => :cumulative_path, parent_id => :parent_folder_id, description => 'Static pages folder' ); Index: openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql,v diff -u -r1.16 -r1.17 --- openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql 13 Aug 2002 12:33:53 -0000 1.16 +++ openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql 6 Sep 2002 12:02:27 -0000 1.17 @@ -26,9 +26,9 @@ select static_page__new_folder ( NULL, -- folder_id - :directory, -- name - :directory, -- label - 'Static pages folder', -- description + :cumulative_path, -- name + :cumulative_path, -- label + 'Static pages folder', -- description :parent_folder_id, -- parent_id current_timestamp, -- creation_date NULL, -- creation_user Index: openacs-4/packages/static-pages/tcl/static-pages-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/tcl/static-pages-procs.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/static-pages/tcl/static-pages-procs.tcl 19 Dec 2001 21:13:57 -0000 1.10 +++ openacs-4/packages/static-pages/tcl/static-pages-procs.tcl 6 Sep 2002 12:02:27 -0000 1.11 @@ -80,16 +80,7 @@ }] # If the folder doesn't exist, create it. if { $folder_id == 0} { - set folder_id [db_exec_plsql create_new_folder { - begin - :1 := static_page.new_folder ( - name => :directory, - label => :directory, - parent_id => :parent_folder_id, - description => 'Static pages folder' - ); - end; - }] + set folder_id [db_exec_plsql create_new_folder {}] if { [string length $folder_add_proc] > 0 } { uplevel "$folder_add_proc $cumulative_path $folder_id" }