diff options
Diffstat (limited to 'lib/doc/jao-org-focus.el')
| -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 | 
