Index: openacs-4/packages/acs-subsite/tcl/subsite-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/Attic/subsite-procs.xql,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/acs-subsite/tcl/subsite-procs.xql 7 Mar 2005 23:48:28 -0000 1.8
+++ openacs-4/packages/acs-subsite/tcl/subsite-procs.xql 8 May 2008 01:35:58 -0000 1.9
@@ -83,5 +83,36 @@
and host = :search_vhost
+
+
+
+ select name, key
+ from subsite_themes
+
+
+
+
+
+ insert into subsite_themes
+ (key, name, template, css, form_template, list_template, list_filter_template)
+ values
+ (:key, :name, :template, :css, :form_template, :list_template, :list_filter_template)
+
+
+
+
+
+ delete from subsite_themes
+ where key = :key
+
+
+
+
+
+ select *
+ from subsite_themes
+ where key = :theme
+
+