Index: openacs-4/contrib/packages/bcms-ui-wizard/www/TODO.txt =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/bcms-ui-wizard/www/TODO.txt,v diff -u -N -r1.3 -r1.4 --- openacs-4/contrib/packages/bcms-ui-wizard/www/TODO.txt 11 Nov 2003 16:42:45 -0000 1.3 +++ openacs-4/contrib/packages/bcms-ui-wizard/www/TODO.txt 5 Mar 2004 14:47:59 -0000 1.4 @@ -224,3 +224,28 @@ } } + + +# TODO: to be removed not a general proc +ad_proc -public bcms::folder::get_image_folder { } { + returns the folder_id of the image folder of this bcms instance +} { + array set one_item [bcms::item::get_item_by_url -root_id [get_bcms_root_folder] -url images -resolve_index false] + return $one_item(item_id) +} + +# TODO: to be removed not a general proc +ad_proc -public bcms::folder::get_file_folder { } { + returns the folder_id of the file folder of this bcms instance +} { + array set one_item [bcms::item::get_item_by_url -root_id [get_bcms_root_folder] -url files -resolve_index false] + return $one_item(item_id) +} + +# TODO: to be removed not a general proc +ad_proc -public bcms::folder::get_page_folder { } { + returns the folder_id of the page folder of this bcms instance +} { + array set one_item [bcms::item::get_item_by_url -root_id [get_bcms_root_folder] -url pages -resolve_index false] + return $one_item(item_id) +}