summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--org-fc-type-cloze.el4
-rw-r--r--org-fc.el3
2 files changed, 3 insertions, 4 deletions
diff --git a/org-fc-type-cloze.el b/org-fc-type-cloze.el
index 53dd744..de32204 100644
--- a/org-fc-type-cloze.el
+++ b/org-fc-type-cloze.el
@@ -90,7 +90,7 @@ subtype."
;; unnecessarily complicated. I couldn't get latex / org text emphasis
;; to work otherwise. If the hole has no hint, we can't use any
;; properties of match 2.
-(defun org-fc-type-cloze--overlay-current ()
+(defun org-fc-type-cloze--overlay-current (hole-beg hole-end)
"Generate a list of overlays to display the hole currently
being reviewed."
(if (match-beginning 2)
@@ -131,7 +131,7 @@ subtype."
(hole-beg (match-beginning 0))
(hole-end (match-end 0)))
(if (= hole id)
- (progn (setq overlays (org-fc-type-cloze--overlay-current))
+ (progn (setq overlays (org-fc-type-cloze--overlay-current hole-beg hole-end))
(setq seen-current t))
(case type
('enumeration
diff --git a/org-fc.el b/org-fc.el
index 2399249..7c345f0 100644
--- a/org-fc.el
+++ b/org-fc.el
@@ -118,8 +118,7 @@ Only 'awk is supported at the moment.")
(defun org-fc-show-latex ()
"Show / re-display latex fragments."
- (org-clear-latex-preview)
- (org-latex-preview))
+ (org-toggle-latex-fragment 4))
;; TODO: Rewrite using skip parameter
(defun org-fc-has-back-heading-p ()