Variable: kotl-menu-common-body
kotl-menu-common-body is a variable defined in kmenu.el.
Value
Large value
(("Edit" ["Set-Cell-Attribute" kotl-mode:set-cell-attribute t] "----"
["Demote" kotl-mode:demote-tree :active t :keys "TAB"]
["Promote" kotl-mode:promote-tree :active t :keys "M-TAB"] "----"
["Add-After-Parent" kotl-mode:add-after-parent t]
["Add-Before-Parent" kotl-mode:add-before-parent t]
["Add-Below-Parent" kotl-mode:add-below-parent t]
["Add-Child" kotl-mode:add-child t]
["Add-Cell" kotl-mode:add-cell t]
["Append-Cell" kotl-mode:append-cell t]
["Split-Cell" kotl-mode:split-cell t] "----"
["Kill-to-Cell-End" kotl-mode:kill-contents t]
["Kill-Tree" kotl-mode:kill-tree t] ["Yank" kotl-mode:yank t] "----"
["Copy-After-Cell" kotl-mode:copy-after t]
["Copy-Before-Cell" kotl-mode:copy-before t]
["Move-After-Cell" kotl-mode:move-after t]
["Move-Before-Cell" kotl-mode:move-before t] "----"
["Fill" kotl-mode:fill-cell t]
["Fill-Paragraph" kotl-mode:fill-paragraph t]
["Set-Fill-Prefix" kotl-mode:set-fill-prefix t] "----"
["Tab-Key-Inserts-Spaces" kotl-mode:toggle-indent-tabs-mode :style
toggle :selected (not kotl-mode:indent-tabs-mode)]
["Tab-Key-Tabs-Over" kotl-mode:toggle-tab-flag :style toggle
:selected kotl-mode:tab-flag])
("Jump-to" ["Cell" kotl-mode:goto-cell t] "----"
["Cell-Beginning" kotl-mode:beginning-of-cell t]
["Cell-End" kotl-mode:end-of-cell t] "----"
["Parent" kotl-mode:up-level t] ["Child" kotl-mode:down-level t]
"----" ["Prev-Cell" kotl-mode:previous-cell t]
["Next-Cell" kotl-mode:next-cell t] "----"
["Prev-Same-Level" kotl-mode:backward-cell t]
["Next-Same-Level" kotl-mode:forward-cell t] "----"
["First-Sibling" kotl-mode:first-sibling t]
["Last-Sibling" kotl-mode:last-sibling t] "----"
["Beginning-of-Tree" kotl-mode:beginning-of-tree t]
["End-of-Tree" kotl-mode:end-of-tree t] "----"
["First-Cell" kotl-mode:beginning-of-buffer t]
["Last-Cell" kotl-mode:end-of-buffer t])
("Label-Type"
["Alphanumeric (Default)" (kview:set-label-type kotl-kview 'alpha) t]
["Legal" (kview:set-label-type kotl-kview 'legal) t]
["Permanent-Idstamp" (kview:set-label-type kotl-kview 'id) t] "----"
["Set-Label-Separator" kview:set-label-separator t])
("Link" ["Add-at-Point" klink:create t])
("Tree" ["Copy-to-Buffer" kotl-mode:copy-tree-to-buffer t]
["Demote" kotl-mode:demote-tree :active t :keys "TAB"]
["Kill" kotl-mode:kill-tree t] ["Mail" kotl-mode:mail-tree t]
["Promote" kotl-mode:promote-tree :active t :keys "M-TAB"]
["Show-Attributes" (kotl-mode:cell-help nil 2) :active t :keys
"C-u C-c h"]
"----" ["Copy-After-Cell" kotl-mode:copy-after t]
["Copy-Before-Cell" kotl-mode:copy-before t]
["Move-After-Cell" kotl-mode:move-after t]
["Move-Before-Cell" kotl-mode:move-before t])
("View" ["Set-View-Spec" kvspec:activate t]
["Toggle-Blank-Lines" kvspec:toggle-blank-lines t] "----"
["Set-Cell-Attribute" kotl-mode:set-cell-attribute t]
["Show-Cell-Attributes" (kotl-mode:cell-help) :active t :keys
"C-c h"]
["All-Cells-Attributes" (kotl-mode:cell-help nil -1) :active t :keys
"C-u -1 C-c h"]
["Show-Tree-Attributes" (kotl-mode:cell-help nil 2) :active t :keys
"C-u C-c h"]
"----" ["Hide (Collapse)" kotl-mode:hide-tree t]
["Hide-Levels" kotl-mode:hide-sublevels t]
["Hide-Subtree" kotl-mode:hide-subtree t]
["Overview" kotl-mode:overview t] "----"
["Show (Expand)" kotl-mode:show-tree t]
["Show-All" kotl-mode:show-all t]
["Show-Subtree" kotl-mode:show-subtree t]
["Show-Top-Level-Only" kotl-mode:top-cells t]))
Documentation
The middle menu entries common to all Koutliner menus.
Source Code
;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/kotl/kmenu.el
;;; ************************************************************************
;;; Public variables
;;; ************************************************************************
(defconst kotl-menu-common-body
(delq
nil
(list
'("Edit"
["Set-Cell-Attribute" kotl-mode:set-cell-attribute t]
"----"
["Demote" kotl-mode:demote-tree
:active t :keys "TAB"]
["Promote" kotl-mode:promote-tree
:active t :keys "M-TAB"]
"----"
["Add-After-Parent" kotl-mode:add-after-parent t]
["Add-Before-Parent" kotl-mode:add-before-parent t]
["Add-Below-Parent" kotl-mode:add-below-parent t]
["Add-Child" kotl-mode:add-child t]
["Add-Cell" kotl-mode:add-cell t]
["Append-Cell" kotl-mode:append-cell t]
["Split-Cell" kotl-mode:split-cell t]
"----"
["Kill-to-Cell-End" kotl-mode:kill-contents t]
["Kill-Tree" kotl-mode:kill-tree t]
["Yank" kotl-mode:yank t]
"----"
["Copy-After-Cell" kotl-mode:copy-after t]
["Copy-Before-Cell" kotl-mode:copy-before t]
["Move-After-Cell" kotl-mode:move-after t]
["Move-Before-Cell" kotl-mode:move-before t]
"----"
["Fill" kotl-mode:fill-cell t]
["Fill-Paragraph" kotl-mode:fill-paragraph t]
["Set-Fill-Prefix" kotl-mode:set-fill-prefix t]
"----"
["Tab-Key-Inserts-Spaces" kotl-mode:toggle-indent-tabs-mode
:style toggle :selected (not kotl-mode:indent-tabs-mode)]
["Tab-Key-Tabs-Over" kotl-mode:toggle-tab-flag
:style toggle :selected kotl-mode:tab-flag])
(if (boundp 'infodock-go-menu) infodock-go-menu)
'("Jump-to"
["Cell" kotl-mode:goto-cell t]
"----"
["Cell-Beginning" kotl-mode:beginning-of-cell t]
["Cell-End" kotl-mode:end-of-cell t]
"----"
["Parent" kotl-mode:up-level t]
["Child" kotl-mode:down-level t]
"----"
["Prev-Cell" kotl-mode:previous-cell t]
["Next-Cell" kotl-mode:next-cell t]
"----"
["Prev-Same-Level" kotl-mode:backward-cell t]
["Next-Same-Level" kotl-mode:forward-cell t]
"----"
["First-Sibling" kotl-mode:first-sibling t]
["Last-Sibling" kotl-mode:last-sibling t]
"----"
["Beginning-of-Tree" kotl-mode:beginning-of-tree t]
["End-of-Tree" kotl-mode:end-of-tree t]
"----"
["First-Cell" kotl-mode:beginning-of-buffer t]
["Last-Cell" kotl-mode:end-of-buffer t])
'("Label-Type"
["Alphanumeric (Default)" (kview:set-label-type kotl-kview 'alpha) t]
["Legal" (kview:set-label-type kotl-kview 'legal) t]
;; ["None" (kview:set-label-type kview 'no) t]
;; ["Partial-Alpha" (kview:set-label-type kview 'partial-alpha) t]
["Permanent-Idstamp" (kview:set-label-type kotl-kview 'id) t]
;; ["Stars" (kview:set-label-type kview 'star) t]
"----"
["Set-Label-Separator" kview:set-label-separator t])
'("Link"
["Add-at-Point" klink:create t])
(if (fboundp 'infodock-options-menu) (infodock-options-menu))
'("Tree"
["Copy-to-Buffer" kotl-mode:copy-tree-to-buffer t]
["Demote" kotl-mode:demote-tree
:active t :keys "TAB"]
["Kill" kotl-mode:kill-tree t]
["Mail" kotl-mode:mail-tree t]
["Promote" kotl-mode:promote-tree
:active t :keys "M-TAB"]
["Show-Attributes" (kotl-mode:cell-help nil 2)
:active t :keys "C-u C-c h"]
"----"
["Copy-After-Cell" kotl-mode:copy-after t]
["Copy-Before-Cell" kotl-mode:copy-before t]
["Move-After-Cell" kotl-mode:move-after t]
["Move-Before-Cell" kotl-mode:move-before t])
'("View"
["Set-View-Spec" kvspec:activate t]
["Toggle-Blank-Lines" kvspec:toggle-blank-lines t]
"----"
["Set-Cell-Attribute" kotl-mode:set-cell-attribute t]
["Show-Cell-Attributes" (kotl-mode:cell-help)
:active t :keys "C-c h"]
["All-Cells-Attributes" (kotl-mode:cell-help nil -1)
:active t :keys "C-u -1 C-c h"]
["Show-Tree-Attributes" (kotl-mode:cell-help nil 2)
:active t :keys "C-u C-c h"]
"----"
["Hide (Collapse)" kotl-mode:hide-tree t]
["Hide-Levels" kotl-mode:hide-sublevels t]
["Hide-Subtree" kotl-mode:hide-subtree t]
["Overview" kotl-mode:overview t]
"----"
["Show (Expand)" kotl-mode:show-tree t]
["Show-All" kotl-mode:show-all t]
["Show-Subtree" kotl-mode:show-subtree t]
["Show-Top-Level-Only" kotl-mode:top-cells t])))
"The middle menu entries common to all Koutliner menus.")