Index: openacs-4/packages/static-pages/tcl/static-pages-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/tcl/static-pages-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/static-pages/tcl/static-pages-procs.tcl	23 Oct 2001 18:53:36 -0000	1.5
+++ openacs-4/packages/static-pages/tcl/static-pages-procs.tcl	1 Nov 2001 19:17:16 -0000	1.6
@@ -335,7 +335,7 @@
     @author Brandoch Calef (bcalef@arsdigita.com)
     @creation-date 2001-02-23
 } {
-    return [db_list get_page_info "select '{'||content_item.get_title($page_id)||'} '||decode(show_comments_p,'t',1,0) from static_pages where static_page_id = $page_id"]
+    return [db_string get_page_info "select '{'||content_item.get_title($page_id)||'} '||decode(show_comments_p,'t',1,0) from static_pages where static_page_id = $page_id"]
 }
 
 
@@ -375,8 +375,6 @@
     if { $page_id >= 0 } {
 	set page_info [util_memoize [list sp_get_page_info_query $page_id]]
 
-
-
 	# We only show the link here if the_public has 
 	# general_comments_create privilege on the page.  Why the_public
 	# rather than the current user?  Because we don't want admins to
@@ -389,6 +387,7 @@
 	}
 	append comment_link "[general_comments_get_comments -print_content_p [lindex $page_info 1] $page_id [ad_conn url]]"
 
+
 	if { [catch {
 	    set fp [open $filename r]
 	    set file_contents [read $fp]