- added a few more wiki components

sql/postgresql/intranet-wiki-create.sql

@@ -46,9 +46,7 @@ begin
     );
     return 0;
 end;' language 'plpgsql';
-
 select inline_0 ();
-
 drop function inline_0 ();
 
 
@@ -78,9 +76,94 @@ begin
     );
     return 0;
 end;' language 'plpgsql';
+select inline_0 ();
+drop function inline_0 ();
+
 
+create or replace function inline_0 ()
+returns integer as ' 
+declare
+    v_plugin            integer;
+begin
+    -- Home Page
+    -- Set the wiki to the very end.
+    --
+    v_plugin := im_component_plugin__new (
+	null,					-- plugin_id
+	''acs_object'',				-- object_type
+	now(),					-- creation_date
+	null,					-- creation_user
+	null,					-- creation_ip
+	null,					-- context_id
+	''Company Wiki Component'',		-- plugin_name
+	''intranet-wiki'',			-- package_name
+        ''right'',				-- location
+	''/intranet/companies/view'',		-- page_url
+        null,					-- view_name
+        80,					-- sort_order
+        ''im_wiki_company_component $company_id'' -- component_tcl
+    );
+    return 0;
+end;' language 'plpgsql';
+select inline_0 ();
+drop function inline_0 ();
+
+
+create or replace function inline_0 ()
+returns integer as ' 
+declare
+    v_plugin            integer;
+begin
+    -- Home Page
+    -- Set the wiki to the very end.
+    --
+    v_plugin := im_component_plugin__new (
+	null,					-- plugin_id
+	''acs_object'',				-- object_type
+	now(),					-- creation_date
+	null,					-- creation_user
+	null,					-- creation_ip
+	null,					-- context_id
+	''User Wiki Component'',		-- plugin_name
+	''intranet-wiki'',			-- package_name
+        ''right'',				-- location
+	''/intranet/users/view'',		-- page_url
+        null,					-- view_name
+        80,					-- sort_order
+        ''im_wiki_user_component $user_id'' -- component_tcl
+    );
+    return 0;
+end;' language 'plpgsql';
 select inline_0 ();
+drop function inline_0 ();
 
+
+create or replace function inline_0 ()
+returns integer as ' 
+declare
+    v_plugin            integer;
+begin
+    -- Home Page
+    -- Set the wiki to the very end.
+    --
+    v_plugin := im_component_plugin__new (
+	null,					-- plugin_id
+	''acs_object'',				-- object_type
+	now(),					-- creation_date
+	null,					-- creation_user
+	null,					-- creation_ip
+	null,					-- context_id
+	''Office Wiki Component'',		-- plugin_name
+	''intranet-wiki'',			-- package_name
+        ''right'',				-- location
+	''/intranet/offices/view'',		-- page_url
+        null,					-- view_name
+        80,					-- sort_order
+        ''im_wiki_office_component $office_id'' -- component_tcl
+    );
+    return 0;
+end;' language 'plpgsql';
+select inline_0 ();
 drop function inline_0 ();