diff options
-rw-r--r-- | gnosis.el | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -701,8 +701,9 @@ Set SPLIT to t to split all input given." (defun gnosis--get-deck-name (&optional id) "Get deck name for ID, or prompt for deck name when ID is nil." - (when (equal (gnosis-select 'name 'decks) nil) - (error "No decks found. Please create a deck first with `gnosis-add-deck'")) + (when (and (equal (gnosis-select 'name 'decks) nil) + (y-or-n-p "No decks found, create deck?")) + (gnosis-add-deck (read-string "Deck name: "))) (if id (gnosis-get 'name 'decks `(= id ,id)) (funcall gnosis-completing-read-function "Deck: " (gnosis-select 'name 'decks)))) |