From a6dd907bfceeda0e7aecc91baa505f0db6cf2f7f Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 28 Dec 2023 13:32:00 +0200 Subject: gnosis-display: Update basic answer faces --- gnosis.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'gnosis.el') diff --git a/gnosis.el b/gnosis.el index 8b00253..edd7c4e 100644 --- a/gnosis.el +++ b/gnosis.el @@ -118,12 +118,13 @@ Example: (defun gnosis-display--basic-answer (answer success user-input) "Display ANSWER. -Depending on the value of SUCCESS, display it using different faces. -If success t, use `gnsois-face-correct' -else use `gnosis-face-false'" +When SUCCESS nil, display USER-INPUT as well" (with-gnosis-buffer (insert - (concat "\n\nAnswer: " (propertize answer 'face (if success 'gnosis-face-correct 'gnosis-face-false)))) + (concat "\n\n" + (propertize "Answer:" 'face 'gnosis-face-directions) + " " + (propertize answer 'face 'gnosis-face-correct))) ;; Insert user wrong answer (when (not success) (insert (concat "\n" -- cgit v1.2.3