Index: openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl,v
diff -u -r1.93.2.13 -r1.93.2.14
--- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	18 May 2020 21:13:20 -0000	1.93.2.13
+++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	18 May 2020 21:20:20 -0000	1.93.2.14
@@ -415,7 +415,7 @@
     # Return 2 digit version number (suitable for number compare
     # operations) from PostgreSQL or 0.0 if not available
     #
-    return [acs::per_thread_cache -key xo:pg_version {
+    return [acs::per_thread_cache -key xotcl-core.pg_version {
       set version 0.0
       if {[db_driverkey {}] eq "postgresql"} {
         set version_string [db_string dbqd.null.get_version {select version() from dual}]