Index: openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl	27 Jun 2015 12:26:00 -0000	1.7
+++ openacs-4/packages/acs-core-docs/www/sql/display-sql.tcl	29 Jun 2015 13:15:58 -0000	1.8
@@ -49,7 +49,7 @@
     foreach f $files { 
         regexp {([^/]*)/([^/]*)$} $f match db url
         append text [subst {
-	    <li> <a href="[ns_quotentml [export_vars -base display-sql {db url package_key}]]">$db</a></li>
+	    <li> <a href="[ns_quotehtml [export_vars -base display-sql {db url package_key}]]">$db</a></li>
 	}]
     }
     if {$files eq ""} {