[nongnu] elpa/org-present 2cc76b5b2b 25/47: add hide/show for cursor

[ELPA Syncer]

branch: elpa/org-present
commit 2cc76b5b2bdd3075551519c184b496b9ce33dd56
Author: Richard Lister <ric@burton-2.home>
Commit: Richard Lister <ric@burton-2.home>

    add hide/show for cursor
---
 org-present.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/org-present.el b/org-present.el
index 0b9217f5bd..576e75f165 100644
--- a/org-present.el
+++ b/org-present.el
@@ -197,6 +197,16 @@
   (setq cursor-type org-present-cursor-cache)
   (define-key org-present-mode-keymap (kbd "SPC") 'self-insert-command))
 
+(defun org-present-hide-cursor ()
+  "Hide the cursor for current window."
+  (interactive)
+  (internal-show-cursor (selected-window) nil))
+
+(defun org-present-show-cursor ()
+  "Show the cursor for current window."
+  (interactive)
+  (internal-show-cursor (selected-window) t))
+
 ;;;###autoload
 (defun org-present ()
   "init."