branch: elpa/casual
commit ed1fb6efb337cda7343565272634031e55287bab
Author: Charles Choi <[email protected]>
Commit: Charles Choi <[email protected]>

    Minor Tuning
    
    * docs/editkit.org: Add registers and project menus to install instructions.
    * lisp/casual-org-utils.el (casual-org-info): Support src block for
    context-sensitive info.
---
 docs/casual.info         | Bin 179988 -> 180140 bytes
 docs/editkit.org         |   4 +++-
 lisp/casual-org-utils.el |   1 +
 3 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/docs/casual.info b/docs/casual.info
index b40a83e23b..5eba5a3ba8 100644
Binary files a/docs/casual.info and b/docs/casual.info differ
diff --git a/docs/editkit.org b/docs/editkit.org
index d899906753..d4e5429df1 100644
--- a/docs/editkit.org
+++ b/docs/editkit.org
@@ -23,11 +23,13 @@ A reference menu (~casual-editkit-main-tmenu~) illustrating 
nearly all the diffe
   (keymap-global-set "C-o" #'casual-editkit-main-tmenu)
 #+end_src
 
-Also suggested is to globally bind the window and rectangle menus as shown 
below.
+Also suggested is to globally bind the windows, rectangle, registers, and 
project menus as shown below.
 
 #+begin_src elisp :lexical no
   (keymap-global-set "C-c w" #'casual-editkit-windows-tmenu)
   (keymap-global-set "C-c r" #'casual-editkit-rectangle-tmenu)
+  (keymap-global-set "C-c g" #'casual-editkit-registers-tmenu)
+  (keymap-global-set "C-c p" #'casual-editkit-project-tmenu)
 #+end_src
 
 For motivated users desiring a bespoke solution, it is recommended that they 
use Casual EditKit as a library of menus to build their own workflows.
diff --git a/lisp/casual-org-utils.el b/lisp/casual-org-utils.el
index e410fe1f7c..afe7749cd8 100644
--- a/lisp/casual-org-utils.el
+++ b/lisp/casual-org-utils.el
@@ -102,6 +102,7 @@ level of the Org manual is opened."
                ((org-at-heading-p) "(org) Headlines")
                ((org-at-item-p) "(org) Plain Lists")
                ((or (org-at-table-p) (org-at-TBLFM-p)) "(org) Tables")
+               ((org-in-src-block-p) "(org) Working with Source Code")
                ((org-at-block-p) "(org) Blocks")
                ((org-at-drawer-p) "(org) Drawers")
                ((org-at-property-p) "(org) Property Syntax")

Reply via email to