From d3b3c337537e539b89d6600bacc38d9e642c2523 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Sat, 19 Dec 2015 00:24:39 +0100 Subject: Move outline-toggle-entry to outline library --- emacs/.emacs.d/site-lisp/oni-outline.el | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'emacs/.emacs.d/site-lisp') diff --git a/emacs/.emacs.d/site-lisp/oni-outline.el b/emacs/.emacs.d/site-lisp/oni-outline.el index 6c56515..96d7179 100644 --- a/emacs/.emacs.d/site-lisp/oni-outline.el +++ b/emacs/.emacs.d/site-lisp/oni-outline.el @@ -40,5 +40,17 @@ (outline-hide-entry)) (call-interactively func)))))) +;;;###autoload +(defun oni:outline-toggle-entry () + "Show or hide an outline entry depending on its current state." + (interactive) + (if (outline-on-heading-p) + (if (eql (save-excursion + (end-of-line) + (outline-invisible-p)) + 'outline) + (outline-show-entry) + (outline-hide-entry)))) + (provide 'oni-outline) ;;; oni-outline.el ends here -- cgit v1.2.3-54-g00ecf