From eb6011d82e0f334f167f525f8759f2d50859c954 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Tue, 6 Feb 2024 06:24:54 +0200 Subject: gnosis-display-hint: adjust for when hint is nil --- gnosis.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/gnosis.el b/gnosis.el index b4d2e44..e5d3a78 100644 --- a/gnosis.el +++ b/gnosis.el @@ -266,10 +266,11 @@ SUCCESS is t when user-input is correct, else nil" (defun gnosis-display-hint (hint) "Display HINT." - (goto-char (point-max)) - (insert - (propertize "\n\n-----\n" 'face 'gnosis-face-seperator) - (propertize hint 'face 'gnosis-face-hint))) + (let ((hint (or hint ""))) + (goto-char (point-max)) + (insert + (propertize "\n\n-----\n" 'face 'gnosis-face-seperator) + (propertize hint 'face 'gnosis-face-hint)))) (cl-defun gnosis-display-cloze-reveal (&key (cloze-char gnosis-cloze-string) replace (success t) (face nil)) "Replace CLOZE-CHAR with REPLACE. -- cgit v1.2.3