diff options
author | Thanos Apollo <[email protected]> | 2023-12-28 07:44:54 +0200 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2023-12-28 07:44:54 +0200 |
commit | ac7a0b6b084b5eafab352b0cc77e15165ad894cc (patch) | |
tree | 429c6f4f0adbb7d5fc85f413e4779b46b308dfe2 /gnosis.el | |
parent | eb25fa1a21e193173d2512777b002d06d4ab2cb9 (diff) |
Rename gnosis--select -> gnosis-select
No need to have this function hidden
Diffstat (limited to 'gnosis.el')
-rw-r--r-- | gnosis.el | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -61,7 +61,7 @@ (defvar gnosis-db (emacsql-sqlite-open (concat gnosis-dir "/" "gnosis.db")) "Gnosis database.") -(cl-defun gnosis--select (value table &optional (restrictions '1=1)) +(cl-defun gnosis-select (value table &optional (restrictions '1=1)) "Select VALUE from TABLE, optionally with RESTRICTIONS." (emacsql gnosis-db `[:select ,value :from ,table :where ,restrictions])) @@ -85,7 +85,7 @@ Example: (cl-defun gnosis-get (value table &optional (restrictions '1=1)) "Get VALUE from TABLE, optionally with where RESTRICTIONS." - (caar (gnosis--select value table restrictions))) + (caar (gnosis-select value table restrictions))) (defun gnosis-get-note-tags (id) "Return tags for note ID." @@ -213,9 +213,9 @@ Set SPLIT to t to split all input given." (defun gnosis--get-deck-name () "Get name from table DECKS." - (when (equal (gnosis--select 'name 'decks) nil) + (when (equal (gnosis-select 'name 'decks) nil) (error "No decks found")) - (completing-read "Deck: " (gnosis--select 'name 'decks))) + (completing-read "Deck: " (gnosis-select 'name 'decks))) (cl-defun gnosis--get-deck-id (&optional (deck (gnosis--get-deck-name))) "Get id for DECK name." |