Index: openacs-4/packages/acs-tcl/tcl/security-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-init.tcl,v
diff -u -r1.5.10.1 -r1.5.10.2
--- openacs-4/packages/acs-tcl/tcl/security-init.tcl	10 Sep 2015 08:21:59 -0000	1.5.10.1
+++ openacs-4/packages/acs-tcl/tcl/security-init.tcl	2 Jan 2016 20:42:58 -0000	1.5.10.2
@@ -14,7 +14,7 @@
 ad_schedule_proc -thread f [parameter::get -parameter SessionSweepInterval -default 7200] sec_sweep_sessions
 
 # Verify that the secret_tokens table is populated
-set secret_tokens_exists [db_string secret_tokens_exists "select decode(count(*),0,0,1) from secret_tokens"]
+set secret_tokens_exists [db_string secret_tokens_exists {select decode(count(*),0,0,1) from secret_tokens}]
 
 if { $secret_tokens_exists == 0 } {
     populate_secret_tokens_db