Index: openacs-4/packages/acs-tcl/tcl/00-database-procs-oracle.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/00-database-procs-oracle.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/acs-tcl/tcl/00-database-procs-oracle.tcl	3 Aug 2001 13:18:14 -0000	1.11
+++ openacs-4/packages/acs-tcl/tcl/00-database-procs-oracle.tcl	19 Aug 2001 21:26:05 -0000	1.12
@@ -7,15 +7,6 @@
     @cvs-id $Id$
 }
 
-ad_proc db_compatible_rdbms_p { db_type } {
-    Returns 1 if the given db_type is compatible with the current RDBMS.  If db_type
-    is blank we assume this is a legacy Oracle package that's not been moved to
-    the OpenACS multidb framework.
-} {
-    return [expr { [empty_string_p $db_type] || [string equal [db_type] $db_type] || \
-                   [string equal $db_type "common"] }]
-}
-
 ad_proc -public db_nullify_empty_string { string } {
     A convenience function that returns [db_null] if $string is the empty string.
 } {