summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--lib/doc/jao-org-focus.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/doc/jao-org-focus.el b/lib/doc/jao-org-focus.el
index e9d6ed2..7a73029 100644
--- a/lib/doc/jao-org-focus.el
+++ b/lib/doc/jao-org-focus.el
@@ -47,7 +47,8 @@ When invoked on an indirect buffer, pops back to its base."
(setq jao-org-focus--parent parent
jao-org-focus--section title)
(org-narrow-to-subtree)
- (show-subtree)))))
+ (show-subtree)
+ (count-words (point-min) (point-max))))))
(defun jao-org-focus-redisplay ()
"Redisplay a focused buffer.
@@ -103,7 +104,8 @@ With arg, offer to switch to all children, regardless of their parent."
:lighter " ◎"
:keymap '(("\C-cl" . jao-org-focus-switch)
("\C-cR" . jao-org-focus-redisplay)
- ("\C-co" . jao-org-focus))
+ ("\C-co" . jao-org-focus)
+ ("\C-cw" . count-words))
(if org-focus-mode
(add-hook 'after-save-hook #'jao-org-focus-redisplay-children nil t)
(remove-hook 'after-save-hook #'jao-org-focus-redisplay-children t)))