diff options
| -rw-r--r-- | lib/doc/jao-org-focus.el | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/lib/doc/jao-org-focus.el b/lib/doc/jao-org-focus.el index 13f1201..e9d6ed2 100644 --- a/lib/doc/jao-org-focus.el +++ b/lib/doc/jao-org-focus.el @@ -18,16 +18,12 @@ ;; You should have received a copy of the GNU General Public License ;; along with this program. If not, see <https://www.gnu.org/licenses/>. -;;; Commentary: - -;; Miscellanous utilities for working with org files - (require 'org) -;;; focus on subtree (defvar-local jao-org-focus--parent nil) (defvar-local jao-org-focus--section nil) +;;; focus on subtree (defun jao-org-focus () "Pop creatingly to an indirect buffer focused on the encloing subtree. @@ -46,6 +42,7 @@ When invoked on an indirect buffer, pops back to its base." (if-let* ((b (get-buffer bname))) (pop-to-buffer b) (clone-indirect-buffer bname t) + (org-focus-mode -1) (org-focus-child-mode) (setq jao-org-focus--parent parent jao-org-focus--section title) @@ -117,4 +114,4 @@ With arg, offer to switch to all children, regardless of their parent." :keymap org-focus-mode-map) (provide 'jao-org-focus) -;;; jao-org.el ends here +;;; jao-org-focus.el ends here |