Index: openacs-4/packages/acs-tcl/tcl/10-database-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/10-database-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-tcl/tcl/10-database-procs.tcl	20 Mar 2001 22:51:56 -0000	1.2
+++ openacs-4/packages/acs-tcl/tcl/10-database-procs.tcl	21 Mar 2001 00:01:39 -0000	1.3
@@ -14,6 +14,15 @@
     return [nsv_get ad_database_type .]
 }
 
+proc_doc db_null { } {
+    Returns an empty string, which Oracle thinks is null.  This routine was
+    invented to provide an RDBMS-specific null value but doesn't actually
+    work.  I (DRB) left it in to speed porting - we should really clean up
+    the code an pull out the calls instead, though.
+} {
+    return ""
+}
+
 proc_doc db_quote { string } { Quotes a string value to be placed in a SQL statement. } {
     regsub -all {'} "$string" {''} result
     return $result