summaryrefslogtreecommitdiff
path: root/org-fc-type-cloze.el
diff options
context:
space:
mode:
authorLeon Rische <leon.rische@me.com>2020-01-12 13:07:21 +0100
committerLeon Rische <leon.rische@me.com>2020-01-12 13:07:21 +0100
commit00aef827a9b57620561dad5acbce5bd32e59ed6f (patch)
tree6ccc6e50984f90f5244086f98a93a173be1cee14 /org-fc-type-cloze.el
parent89892c5da83bcc4cec513cb5b5964d4ef1147fea (diff)
Fix overlay location & show revealed cloze holes in bold face
Diffstat (limited to 'org-fc-type-cloze.el')
-rw-r--r--org-fc-type-cloze.el10
1 files changed, 9 insertions, 1 deletions
diff --git a/org-fc-type-cloze.el b/org-fc-type-cloze.el
index 235c0c7..e483a09 100644
--- a/org-fc-type-cloze.el
+++ b/org-fc-type-cloze.el
@@ -9,6 +9,11 @@
(defvar org-fc-type-cloze-context 1
"Number of surrounding cards to show for 'context' type cards")
+(defface org-fc-type-cloze-hole-face
+ '((t (:bold t)))
+ "Face for org-fc cloze card holes."
+ :group 'org-fc)
+
(defvar org-fc-type-cloze-hole-re
(rx
(seq
@@ -100,7 +105,10 @@
(if (plist-member overlays :after-hint)
(org-fc-hide-overlay (plist-get overlays :after-hint)))
(org-fc-hide-overlay (plist-get overlays :hint))
- (delete-overlay (plist-get overlays :text)))
+ ;; (delete-overlay (plist-get overlays :text))
+ (org-fc-show-overlay
+ (plist-get overlays :text)
+ 'org-fc-type-cloze-hole-face))
(org-fc-review-rate-hydra/body))
(defun org-fc-type-cloze-setup (position)