From 60eb3aa930da1bc3de10fb88d31c7e97892cb79b Mon Sep 17 00:00:00 2001 From: Phillip Lord Date: Fri, 26 Jul 2019 21:04:14 +0100 Subject: Update documentation --- org-drill.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/org-drill.el b/org-drill.el index 9c46a29..667a1d8 100644 --- a/org-drill.el +++ b/org-drill.el @@ -1832,6 +1832,7 @@ visual overlay, or with the string TEXT if it is supplied." (overlay-put ovl 'display text)))) (defun org-drill-hide-heading-at-point (&optional text) + "Hide the heading at point." (unless (org-at-heading-p) (error "Point is not on a heading")) (save-excursion @@ -1840,6 +1841,7 @@ visual overlay, or with the string TEXT if it is supplied." (org-drill-hide-region beg (point) text)))) (defun org-drill-hide-comments () + "Hide comments." (save-excursion (while (re-search-forward "^#.*$" nil t) (org-drill-hide-region (match-beginning 0) (match-end 0))))) -- cgit v1.2.3