diff options
| author | Thanos Apollo <public@thanosapollo.org> | 2026-02-23 00:13:15 +0200 |
|---|---|---|
| committer | Thanos Apollo <public@thanosapollo.org> | 2026-02-23 00:48:28 +0200 |
| commit | 93408776b178d79dbfffdbc0d291fde31c01e1ac (patch) | |
| tree | 65b046156c2509e53c2b5cbf39bbfce0108e67fb | |
| parent | f96b82512bccf0c7fce996bf229e88ec7fac3a35 (diff) | |
db: Version bump to 4, add file column indexes.
| -rw-r--r-- | org-gnosis.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/org-gnosis.el b/org-gnosis.el index 9b4905c..0d7330e 100644 --- a/org-gnosis.el +++ b/org-gnosis.el @@ -885,15 +885,13 @@ ELEMENT should be the output of `org-element-parse-buffer'." ;; Org-Gnosis Database -;; Org-Gnosis Database - (defun org-gnosis--file-hash (file) "Compute SHA1 hash of FILE content." (with-temp-buffer (insert-file-contents file) (secure-hash 'sha1 (current-buffer)))) -(defconst org-gnosis-db-version 3) +(defconst org-gnosis-db-version 4) (defconst org-gnosis-db--table-schemata '((nodes @@ -1062,11 +1060,14 @@ Checks database version and prompts user for rebuild if needed." (defun org-gnosis-db-init () "Initialize database. -Create all tables and set version for new database." +Create all tables, indexes, and set version for new database." (message "Creating new org-gnosis database...") (emacsql-with-transaction (org-gnosis-db-get) (pcase-dolist (`(,table ,schema) org-gnosis-db--table-schemata) (emacsql (org-gnosis-db-get) [:create-table $i1 $S2] table schema)) + ;; Indexes on file column for sync performance + (emacsql (org-gnosis-db-get) [:create-index :if-not-exists idx-nodes-file :on nodes [file]]) + (emacsql (org-gnosis-db-get) [:create-index :if-not-exists idx-journal-file :on journal [file]]) (emacsql (org-gnosis-db-get) [:pragma (= user-version org-gnosis-db-version)]))) (defun org-gnosis-db-init-if-needed () |