branch: elpa/org-drill
commit 2f056255e66103b89201e81ad208cb47aaef2823
Author: Phillip Lord <[email protected]>
Commit: Phillip Lord <[email protected]>
Re-namespace with-hidden-cloze-text
---
org-drill.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/org-drill.el b/org-drill.el
index 19f8fa27cc..4813f53621 100644
--- a/org-drill.el
+++ b/org-drill.el
@@ -782,7 +782,7 @@ CMD is bound, or nil if it is not bound to a key."
t "^[^.].*\\.org$"))
(t scope)))
-(defmacro with-hidden-cloze-text (&rest body)
+(defmacro org-drill-with-hidden-cloze-text (&rest body)
`(progn
(org-drill-hide-clozed-text)
(unwind-protect
@@ -2093,7 +2093,7 @@ Note: does not actually alter the item."
(defun org-drill-present-simple-card (session)
(with-hidden-comments
(with-hidden-cloze-hints
- (with-hidden-cloze-text
+ (org-drill-with-hidden-cloze-text
(org-drill-hide-all-subheadings-except nil)
(org-drill--show-latex-fragments) ; overlay all LaTeX fragments with
images
(ignore-errors
@@ -2124,7 +2124,7 @@ Note: does not actually alter the item."
(defun org-drill-present-simple-card-with-typed-answer (session)
(with-hidden-comments
(with-hidden-cloze-hints
- (with-hidden-cloze-text
+ (org-drill-with-hidden-cloze-text
(org-drill-hide-all-subheadings-except nil)
(org-drill--show-latex-fragments) ; overlay all LaTeX fragments with
images
(ignore-errors
@@ -2142,7 +2142,7 @@ Note: does not actually alter the item."
(defun org-drill-present-two-sided-card (session)
(with-hidden-comments
(with-hidden-cloze-hints
- (with-hidden-cloze-text
+ (org-drill-with-hidden-cloze-text
(let ((drill-sections (org-drill-hide-all-subheadings-except nil)))
(when drill-sections
(save-excursion
@@ -2161,7 +2161,7 @@ Note: does not actually alter the item."
(defun org-drill-present-multi-sided-card (session)
(with-hidden-comments
(with-hidden-cloze-hints
- (with-hidden-cloze-text
+ (org-drill-with-hidden-cloze-text
(let ((drill-sections (org-drill-hide-all-subheadings-except nil)))
(when drill-sections
(save-excursion
@@ -3571,7 +3571,7 @@ returns its return value."
(let ((prompt nil))
(with-hidden-comments
(with-hidden-cloze-hints
- (with-hidden-cloze-text
+ (org-drill-with-hidden-cloze-text
(cl-case (cl-random 6)
;; PWL 2018-06-22
;; As far as I can tell, neither prompt nor reveal-headings