summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2023-12-19 20:19:48 +0200
committerThanos Apollo <[email protected]>2023-12-19 20:19:48 +0200
commit13837a97f9b4ed2afbf1c01d9f9f66387df93d78 (patch)
tree02cfdf31b7180c34cf888031c27647f3bee9af9e /gnosis.el
parentfffb1d949c5fdaac7fb83cc62ff6a2c3b63639a8 (diff)
Fix displaying of questions
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/gnosis.el b/gnosis.el
index 6e3af1a..e0d05d4 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -77,9 +77,12 @@ Example:
(defun gnosis--display-question (id)
"Display main row for question ID."
(let ((question (gnosis-get 'main 'notes `(= id ,id))))
- (erase-buffer)
- (insert question 1)
- (sit-for 0.5)))
+ (with-current-buffer
+ (switch-to-buffer
+ (get-buffer-create "*gnosis*"))
+ (erase-buffer)
+ (insert question)
+ (sit-for 0.5))))
(defun gnosis--ask-input (prompt)
"PROMPT user for input until `q' is given.