Mercurial > hg > egg-tcls

changeset 138:743c1bea2498

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add utility functions for feeds database creation.
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 04 Jun 2013 13:24:30 +0300
parents 0701ea4a76d4
children 3305e142eecc
files util_convert.tcl
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/util_convert.tcl	Tue Jun 04 13:24:11 2013 +0300
+++ b/util_convert.tcl	Tue Jun 04 13:24:30 2013 +0300
@@ -68,3 +68,12 @@
     create_table "${utable}_votes" "$sql2"
   }
 }
+
+
+proc drop_table_feeds { } {
+  drop_table "feed_data"
+}
+
+proc create_table_feeds { } {
+  create_table_or_fail "feed_data" "feed VARCHAR(64), utime INT, url VARCHAR(512), title VARCHAR(256)"
+}