Index: openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl,v
diff -u -r1.49 -r1.50
--- openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl	20 Apr 2004 21:13:03 -0000	1.49
+++ openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl	17 May 2004 15:14:56 -0000	1.50
@@ -1769,7 +1769,7 @@
 
     } elseif { [string equal $command "blob_dml_file"] } {
         # PostgreSQL:
-        db_with_handle db {
+        db_with_handle -dbn $dbn db {
             # another ugly hack to avoid munging tcl files.
             # __lob_id needs to be set inside of a query (.xql) file for this
             # to work.  Say for example that you need to create a lob. In 
@@ -1798,7 +1798,7 @@
 
     } else {
         # PostgreSQL:
-        db_with_handle db {
+        db_with_handle -dbn $dbn db {
             db_exec dml $db $full_statement_name $sql
         }
     }