summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/gnosis.el b/gnosis.el
index 8790d5e..f08e1c9 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -317,8 +317,12 @@ Optional argument FLATTEN, when non-nil, flattens the result."
(cl-defun gnosis--drop-table (table)
"Drop TABLE from `gnosis-db'."
+ (emacsql gnosis-db `[:drop-table ,table]))
+
+(cl-defun gnosis-drop-table (table)
+ "Drop TABLE from `gnosis-db'."
(when (gnosis-table-exists-p table)
- (emacsql gnosis-db `[:drop-table ,table])))
+ (gnosis--drop-table table)))
(cl-defun gnosis--insert-into (table values)
"Insert VALUES to TABLE."