summaryrefslogtreecommitdiffabout
path: root/scm/dictrans.scm
authorSergey Poznyakoff <gray@gnu.org.ua>2004-10-14 16:07:25 (GMT)
committer Sergey Poznyakoff <gray@gnu.org.ua>2004-10-14 16:07:25 (GMT)
commit39a3d913eb0e0a43282370c6dbc36b815078a634 (patch) (side-by-side diff)
treedbfec80a9a081da4189fe34219a8edb6dc31ec96 /scm/dictrans.scm
parent1b7f3c080397368a5710a4507fd95cc9eb4a29c8 (diff)
downloadellinika-39a3d913eb0e0a43282370c6dbc36b815078a634.tar.gz
ellinika-39a3d913eb0e0a43282370c6dbc36b815078a634.tar.bz2
(cleanup-db): Cleanup locus table
git-svn-id: file:///home/puszcza/svnroot/ellinika/trunk@243 941c8c0f-9102-463b-b60b-cd22ce0e6858
Diffstat (limited to 'scm/dictrans.scm') (more/less context) (ignore whitespace changes)
-rw-r--r--scm/dictrans.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/scm/dictrans.scm b/scm/dictrans.scm
index d0724b0..1a5320a 100644
--- a/scm/dictrans.scm
+++ b/scm/dictrans.scm
@@ -599,6 +599,7 @@
0)))
(define (cleanup-db conn)
+ (run-query conn "DELETE FROM locus")
(run-query conn "DELETE FROM links")
(run-query conn "DELETE FROM articles")
(run-query conn "DELETE FROM dict")

Return to:

Send suggestions and report system problems to the System administrator.