Index: openacs-4/packages/file-storage/www/folder-create-2-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/folder-create-2-postgresql.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/file-storage/www/folder-create-2-postgresql.xql 14 Aug 2001 03:18:34 -0000 1.2
+++ openacs-4/packages/file-storage/www/folder-create-2-postgresql.xql 25 Sep 2001 16:53:13 -0000 1.3
@@ -6,58 +6,16 @@
- select content_folder__new (
+ select file_storage__new_folder (
:name, -- name
:folder_name, -- label
- null, -- description
:parent_id, -- parent_id
- null, -- context_id (default)
- null, -- folder_id (default)
- now(), -- creation_date
:user_id, -- creation_user
:creation_ip -- creation_ip
);
-
-
-
-
- begin
-
- PERFORM content_folder__register_content_type(
- :folder_id, -- folder_id
- 'content_revision', -- content_type
- 'f' -- include_subtypes (default)
- );
-
- PERFORM content_folder__register_content_type(
- :folder_id, -- folder_id
- 'content_folder', -- content_type
- 'f' -- include_subtypes (default)
- );
-
- return 0;
-
- end;
-
-
-
-
-
-
-
- select acs_permission__grant_permission (
- :folder_id, -- object_id
- :user_id, -- grantee_id
- 'admin' -- privilege
- );
-
-
-
-
-