Mercurial > hg > egg-tcls

changeset 23:9ba859d9f931

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor bugfix with TCL escaping.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 05 Sep 2011 18:38:47 +0300
parents 7feaff7cc22e
children ac38d12e3b72
files convert_urllog_db.tcl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/convert_urllog_db.tcl	Mon Sep 05 18:37:33 2011 +0300
+++ b/convert_urllog_db.tcl	Mon Sep 05 18:38:47 2011 +0300
@@ -54,7 +54,7 @@
 
 ### Drop old table
 puts "Dropping current '$db_table' table."
-if {[catch {urldb eval {DROP TABLE $db_table}} uerrmsg]} {
+if {[catch {urldb eval "DROP TABLE $db_table"} uerrmsg]} {
 	puts "Dropping table resulted in error (ignored): $uerrmsg"
 }