Index: openacs-4/packages/acs-kernel/acs-kernel.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/acs-kernel.info,v
diff -u -r1.47 -r1.48
--- openacs-4/packages/acs-kernel/acs-kernel.info	31 Oct 2003 10:17:38 -0000	1.47
+++ openacs-4/packages/acs-kernel/acs-kernel.info	9 Nov 2003 12:51:51 -0000	1.48
@@ -7,13 +7,13 @@
     <initial-install-p>t</initial-install-p>
     <singleton-p>t</singleton-p>
     
-    <version name="5.0.0a4" url="http://openacs.org/repository/download/apm/acs-kernel-5.0.0a4.apm">
+    <version name="5.0.0a5" url="http://openacs.org/repository/download/apm/acs-kernel-5.0.0a5.apm">
         <owner url="mailto:dhogaza@pacifier.com">Don Baccus</owner>
         <summary>Routines and data models providing the foundation for OpenACS-based Web services.</summary>
         <release-date>2003-09-25</release-date>
         <vendor url="http://openacs.org/">OpenACS</vendor>
 
-        <provides url="acs-kernel" version="5.0.0a4"/>
+        <provides url="acs-kernel" version="5.0.0a5"/>
 
         <callbacks>
         </callbacks>
Index: openacs-4/packages/acs-kernel/sql/postgresql/postgresql.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/postgresql.sql,v
diff -u -r1.32 -r1.33
--- openacs-4/packages/acs-kernel/sql/postgresql/postgresql.sql	17 May 2003 01:47:10 -0000	1.32
+++ openacs-4/packages/acs-kernel/sql/postgresql/postgresql.sql	9 Nov 2003 12:51:52 -0000	1.33
@@ -568,9 +568,9 @@
   key      alias for $1;
 begin
   if key is null then
-    return ''X00'';
+    return ''X00''::varbit;
   else
-    return key || ''X00'';
+    return key || ''X00''::varbit;
   end if;
 end;' language 'plpgsql' with(iscachable);
 
@@ -584,9 +584,9 @@
   key      alias for $1;
 begin
   if key is null then
-    return ''XFFFFFFFF'';
+    return ''XFFFFFFFF''::varbit;
   else
-    return key || ''XFFFFFFFF'';
+    return key || ''XFFFFFFFF''::varbit;
   end if;
 end;' language 'plpgsql' with(iscachable);
 
Index: openacs-4/packages/acs-kernel/sql/postgresql/upgrade/upgrade-5.0a4-5.0a5.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/upgrade/Attic/upgrade-5.0a4-5.0a5.sql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-kernel/sql/postgresql/upgrade/upgrade-5.0a4-5.0a5.sql	9 Nov 2003 12:51:52 -0000	1.1
@@ -0,0 +1,32 @@
+-- for postgresql 7.4 the || op needs an explicit cast.
+
+create or replace function tree_left(varbit) returns varbit as '
+
+-- Create a key less than or equal to that of any child of the
+-- current key.
+
+declare
+  key      alias for $1;
+begin
+  if key is null then
+    return ''X00''::varbit;
+  else
+    return key || ''X00''::varbit;
+  end if;
+end;' language 'plpgsql' with(iscachable);
+
+create or replace function tree_right(varbit) returns varbit as '
+
+-- Create a key greater or equal to that of any child of the current key.
+-- Used in BETWEEN expressions to select the subtree rooted at the given
+-- key. 
+
+declare
+  key      alias for $1;
+begin
+  if key is null then
+    return ''XFFFFFFFF''::varbit;
+  else
+    return key || ''XFFFFFFFF''::varbit;
+  end if;
+end;' language 'plpgsql' with(iscachable);