Index: openacs-4/packages/acs-tcl/tcl/00-database-procs-postgresql.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/00-database-procs-postgresql.tcl,v
diff -u -N -r1.35.2.3 -r1.35.2.4
--- openacs-4/packages/acs-tcl/tcl/00-database-procs-postgresql.tcl	5 Feb 2003 23:24:43 -0000	1.35.2.3
+++ openacs-4/packages/acs-tcl/tcl/00-database-procs-postgresql.tcl	8 Feb 2003 16:45:10 -0000	1.35.2.4
@@ -722,8 +722,9 @@
     }
 
     if { $error_found } {
+        ns_log Error "db_source_sql_file: $file:\n$error_lines"
         global errorCode
-        return -code error -errorinfo $error_lines -errorcode $errorCode
+        return -code error -errorinfo $error_lines -errorcode $errorCode $error_lines
     }
 }