Index: openacs-4/packages/acs-developer-support/www/request-info.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/www/request-info.tcl,v
diff -u -N -r1.16 -r1.17
--- openacs-4/packages/acs-developer-support/www/request-info.tcl	9 Jan 2010 01:56:09 -0000	1.16
+++ openacs-4/packages/acs-developer-support/www/request-info.tcl	22 Jan 2010 17:06:44 -0000	1.17
@@ -250,7 +250,7 @@
                 set sql $new_sql
             }
 
-	    append value "$command $handle<pre>[ns_quotehtml $sql]</pre>"
+	    append value "$command $statement_pool $handle<pre>[ns_quotehtml $sql]</pre>"
 	}
 
         if { ![string equal $command "getrow"] || [template::util::is_true $getrow_p] } {