emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

app/present: fix misnamed hook function

Browse source
This commit is contained in:
Henrik Lissner 2017-04-11 18:47:22 -04:00
parent f9ddc53bfc
commit 86643efaf2
1 changed files with 8 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

13
modules/app/present/autoload.el
View file

@ -52,6 +52,13 @@
(mapc 'delete-overlay +present--overlays-list) (mapc 'delete-overlay +present--overlays-list)
(remove-from-invisibility-spec '(+present))) (remove-from-invisibility-spec '(+present)))
;;;###autoload
(defun +present|detect-slide ()
(outline-show-all)
(if (member "title" (org-get-tags-at))
(text-scale-set 10)
(text-scale-set +present-scale)))
(defun +present--cleanup-org-tree-slides-mode () (defun +present--cleanup-org-tree-slides-mode ()
(unless (cl-remove-if-not (lambda (buf) (buffer-local-value 'org-tree-slide-mode buf)) (unless (cl-remove-if-not (lambda (buf) (buffer-local-value 'org-tree-slide-mode buf))
(doom-buffers-in-mode 'org-mode)) (doom-buffers-in-mode 'org-mode))
@ -63,11 +70,7 @@
(push overlay +present--overlays-list) (push overlay +present--overlays-list)
(overlay-put overlay 'invisible '+present))) (overlay-put overlay 'invisible '+present)))
(defun +present--detect-slide ()
(outline-show-all)
(if (member "title" (org-get-tags-at))
(text-scale-set 10)
(text-scale-set +present-scale)))
;; --- misc ----------------------------------------------------------------------- ;; --- misc -----------------------------------------------------------------------