Index: openacs-4/packages/clickthrough/clickthrough.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/clickthrough/clickthrough.info,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/clickthrough/clickthrough.info	3 May 2001 20:38:29 -0000	1.2
+++ openacs-4/packages/clickthrough/clickthrough.info	3 May 2001 20:47:06 -0000	1.3
@@ -32,9 +32,9 @@
             <file type="data_model_drop" db_type="postgresql" path="sql/postgresql/clickthrough-drop.sql"/>
             <file type="tcl_init" path="tcl/clickthrough-init.tcl"/>
             <file type="tcl_procs" path="tcl/clickthrough-procs.tcl"/>
-            <file type="data_model_drop" path="tcl/clickthrough-procs.xql"/>
-            <file type="data_model_drop" db_type="postgresql" path="tcl/clickthrough-procs-postgresql.xql"/>
-            <file type="data_model_drop" db_type="oracle" path="tcl/clickthrough-procs-oracle.xql"/>
+            <file type="query_file" path="tcl/clickthrough-procs.xql"/>
+            <file type="query_file" db_type="postgresql" path="tcl/clickthrough-procs-postgresql.xql"/>
+            <file type="query_file" db_type="oracle" path="tcl/clickthrough-procs-oracle.xql"/>
             <file type="content_page" path="www/admin/all-from-local.adp"/>
             <file type="content_page" path="www/admin/all-from-local.tcl"/>
             <file type="content_page" path="www/admin/all-to-foreign.adp"/>
Index: openacs-4/packages/email-handler/sql/postgresql/email-handler-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/email-handler/sql/postgresql/email-handler-create.sql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/email-handler/sql/postgresql/email-handler-create.sql	3 May 2001 20:49:32 -0000	1.1
@@ -0,0 +1,25 @@
+--
+-- packages/email-handler/sql/email-handler-create.sql
+--
+-- @author Henry Minsky <hqm@arsdigita.com>
+-- @creation-date 2000-12-05
+-- @cvs-id $Id: email-handler-create.sql,v 1.1 2001/05/03 20:49:32 domingoa Exp $
+--
+
+create table incoming_email_queue (
+       id              integer primary key,
+       tag	       varchar(256),
+       -- The entire raw message body including all headers
+       content	       text,           
+       arrival_time    date
+);
+
+create sequence incoming_email_queue_sequence;
+
+-- For testing the email handler
+create table email_handler_test (
+  from_header     varchar(4000),
+  subject         varchar(4000),
+  body            varchar(4000)
+);
+
Index: openacs-4/packages/email-handler/tcl/email-handler-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/email-handler/tcl/email-handler-procs.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/email-handler/tcl/email-handler-procs.xql	3 May 2001 20:50:05 -0000	1.1
@@ -0,0 +1,45 @@
+<?xml version="1.0"?>
+<queryset>
+
+<fullquery name="email_handler_process_email_queue.email_handler_get_ids">      
+      <querytext>
+      select id from incoming_email_queue
+      </querytext>
+</fullquery>
+
+ 
+<fullquery name="email_handler_process_email_queue.get_message_info">      
+      <querytext>
+      
+              select tag, content  from incoming_email_queue
+		where id = :id
+	    
+      </querytext>
+</fullquery>
+
+ 
+<fullquery name="email_handler_process_email_queue.delete_from_queue">      
+      <querytext>
+      delete from incoming_email_queue where id = :id
+      </querytext>
+</fullquery>
+
+ 
+<fullquery name="email_handler_process_email_queue.delete_from_queue">      
+      <querytext>
+      delete from incoming_email_queue where id = :id
+      </querytext>
+</fullquery>
+
+ 
+<fullquery name="email_handler_package_id_mem.email_handler_id_get">      
+      <querytext>
+      
+	select package_id from apm_packages
+	where package_key = 'email-handler'
+    
+      </querytext>
+</fullquery>
+
+ 
+</queryset>
Index: openacs-4/packages/email-handler/www/index.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/email-handler/www/index.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/email-handler/www/index.xql	3 May 2001 20:50:26 -0000	1.1
@@ -0,0 +1,13 @@
+<?xml version="1.0"?>
+<queryset>
+
+<fullquery name="test_items">      
+      <querytext>
+      
+    select from_header, subject, body from email_handler_test
+
+      </querytext>
+</fullquery>
+
+ 
+</queryset>