Round 641-650: Org-mode core — cycling, navigation, subtrees, toggles, TODO/priority, LaTeX, shift/meta keys, source editing, properties/IDs, effort/notes (100 org commands)
ober
8b75f8caad195ab948f5e28aa7621b3ad7de1d54
--- a/docs/jemacs-vs-emacs.md +++ b/docs/jemacs-vs-emacs.md @@ -4808,6 +4808,156 @@ No remaining Tier 1 gaps. All core editing, completion, and navigation features | `cosmwasm-schema` | :orange_circle: Scaffolded | CosmWasm: schema | | `cosmwasm-optimize` | :orange_circle: Scaffolded | CosmWasm: optimize | +### Round 641 — Org-mode Core (Cycling, Navigation) + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-mode` | :orange_circle: Scaffold | Enable org-mode | +| `org-cycle` | :orange_circle: Scaffold | Cycle visibility | +| `org-global-cycle` | :orange_circle: Scaffold | Global cycle | +| `org-shifttab` | :orange_circle: Scaffold | Shift-tab cycle | +| `org-return` | :orange_circle: Scaffold | Return | +| `org-meta-return` | :orange_circle: Scaffold | Meta-return | +| `org-insert-item` | :orange_circle: Scaffold | Insert item | +| `org-goto` | :orange_circle: Scaffold | Goto heading | +| `org-switchb` | :orange_circle: Scaffold | Switch buffer | +| `org-beginning-of-line` | :orange_circle: Scaffold | Beginning of line | + +### Round 642 — Org Navigation (Headings, Elements) + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-end-of-line` | :orange_circle: Scaffold | End of line | +| `org-backward-heading-same-level` | :orange_circle: Scaffold | Backward heading | +| `org-forward-heading-same-level` | :orange_circle: Scaffold | Forward heading | +| `org-up-heading-safe` | :orange_circle: Scaffold | Up heading | +| `org-previous-visible-heading` | :orange_circle: Scaffold | Previous visible heading | +| `org-next-visible-heading` | :orange_circle: Scaffold | Next visible heading | +| `org-backward-element` | :orange_circle: Scaffold | Backward element | +| `org-forward-element` | :orange_circle: Scaffold | Forward element | +| `org-up-element` | :orange_circle: Scaffold | Up element | +| `org-down-element` | :orange_circle: Scaffold | Down element | + +### Round 643 — Org Subtree Operations + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-move-subtree-up` | :orange_circle: Scaffold | Move subtree up | +| `org-move-subtree-down` | :orange_circle: Scaffold | Move subtree down | +| `org-demote-subtree` | :orange_circle: Scaffold | Demote subtree | +| `org-promote-subtree` | :orange_circle: Scaffold | Promote subtree | +| `org-cut-subtree` | :orange_circle: Scaffold | Cut subtree | +| `org-copy-subtree` | :orange_circle: Scaffold | Copy subtree | +| `org-paste-subtree` | :orange_circle: Scaffold | Paste subtree | +| `org-mark-subtree` | :orange_circle: Scaffold | Mark subtree | +| `org-mark-element` | :orange_circle: Scaffold | Mark element | +| `org-clone-subtree-with-time-shift` | :orange_circle: Scaffold | Clone with time shift | + +### Round 644 — Org Toggle & Archive + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-toggle-comment` | :orange_circle: Scaffold | Toggle comment | +| `org-toggle-archive-tag` | :orange_circle: Scaffold | Toggle archive tag | +| `org-toggle-ordered-property` | :orange_circle: Scaffold | Toggle ordered | +| `org-toggle-tag` | :orange_circle: Scaffold | Toggle tag | +| `org-toggle-item` | :orange_circle: Scaffold | Toggle item | +| `org-toggle-inline-images` | :orange_circle: Scaffold | Toggle inline images | +| `org-redisplay-inline-images` | :orange_circle: Scaffold | Redisplay images | +| `org-toggle-pretty-entities` | :orange_circle: Scaffold | Toggle pretty entities | +| `org-archive-to-archive-sibling` | :orange_circle: Scaffold | Archive to sibling | +| `org-force-cycle-archived` | :orange_circle: Scaffold | Force cycle archived | + +### Round 645 — Org TODO & Priority + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-todo` | :orange_circle: Scaffold | Toggle TODO state | +| `org-show-todo-tree` | :orange_circle: Scaffold | Show TODO tree | +| `org-priority` | :orange_circle: Scaffold | Set priority | +| `org-priority-up` | :orange_circle: Scaffold | Priority up | +| `org-priority-down` | :orange_circle: Scaffold | Priority down | +| `org-deadline` | :orange_circle: Scaffold | Set deadline | +| `org-schedule` | :orange_circle: Scaffold | Schedule | +| `org-toggle-checkbox` | :orange_circle: Scaffold | Toggle checkbox | +| `org-update-checkbox-count` | :orange_circle: Scaffold | Update checkbox count | +| `org-update-statistics-cookies` | :orange_circle: Scaffold | Update statistics | + +### Round 646 — Org LaTeX & Display + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-toggle-latex-fragment` | :orange_circle: Scaffold | Toggle LaTeX | +| `org-latex-preview` | :orange_circle: Scaffold | LaTeX preview | +| `org-preview-latex-fragment` | :orange_circle: Scaffold | Preview fragment | +| `org-entities-help` | :orange_circle: Scaffold | Entities help | +| `org-toggle-time-stamp-overlays` | :orange_circle: Scaffold | Toggle timestamps | +| `org-indent-mode` | :orange_circle: Scaffold | Indent mode | +| `org-indent-region` | :orange_circle: Scaffold | Indent region | +| `org-fill-paragraph` | :orange_circle: Scaffold | Fill paragraph | +| `org-sort-entries` | :orange_circle: Scaffold | Sort entries | +| `org-insert-structure-template` | :orange_circle: Scaffold | Structure template | + +### Round 647 — Org Shift/Meta Commands + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-shiftup` | :orange_circle: Scaffold | Shift-up | +| `org-shiftdown` | :orange_circle: Scaffold | Shift-down | +| `org-shiftleft` | :orange_circle: Scaffold | Shift-left | +| `org-shiftright` | :orange_circle: Scaffold | Shift-right | +| `org-metaleft` | :orange_circle: Scaffold | Meta-left | +| `org-metaright` | :orange_circle: Scaffold | Meta-right | +| `org-shiftmetaleft` | :orange_circle: Scaffold | Shift-meta-left | +| `org-shiftmetaright` | :orange_circle: Scaffold | Shift-meta-right | +| `org-ctrl-c-ctrl-c` | :orange_circle: Scaffold | C-c C-c dispatch | +| `org-ctrl-c-minus` | :orange_circle: Scaffold | C-c - bullet cycle | + +### Round 648 — Org Edit & Source Blocks + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-edit-special` | :orange_circle: Scaffold | Edit special | +| `org-edit-src-code` | :orange_circle: Scaffold | Edit source code | +| `org-edit-src-exit` | :orange_circle: Scaffold | Exit source edit | +| `org-ctrl-c-star` | :orange_circle: Scaffold | C-c * toggle heading | +| `org-ctrl-c-ret` | :orange_circle: Scaffold | C-c RET table rule | +| `org-drag-element-backward` | :orange_circle: Scaffold | Drag backward | +| `org-drag-element-forward` | :orange_circle: Scaffold | Drag forward | +| `org-mark-ring-push` | :orange_circle: Scaffold | Push mark ring | +| `org-mark-ring-goto` | :orange_circle: Scaffold | Goto mark ring | +| `org-copy-special` | :orange_circle: Scaffold | Copy special | + +### Round 649 — Org Properties & IDs + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-set-property-and-value` | :orange_circle: Scaffold | Set property+value | +| `org-entry-put` | :orange_circle: Scaffold | Entry put | +| `org-entry-get` | :orange_circle: Scaffold | Entry get | +| `org-entry-delete` | :orange_circle: Scaffold | Entry delete | +| `org-property-action` | :orange_circle: Scaffold | Property action | +| `org-insert-drawer` | :orange_circle: Scaffold | Insert drawer | +| `org-insert-property-drawer` | :orange_circle: Scaffold | Insert property drawer | +| `org-id-get-create` | :orange_circle: Scaffold | Get/create ID | +| `org-id-copy` | :orange_circle: Scaffold | Copy ID | +| `org-id-goto` | :orange_circle: Scaffold | Goto ID | + +### Round 650 — Org Misc (Effort, Notes, Dynamic Blocks) + +| Feature | Status | Notes | +|---------|--------|-------| +| `org-set-effort` | :orange_circle: Scaffold | Set effort | +| `org-inc-effort` | :orange_circle: Scaffold | Increment effort | +| `org-add-note` | :orange_circle: Scaffold | Add note | +| `org-evaluate-time-range` | :orange_circle: Scaffold | Evaluate time range | +| `org-refile-copy` | :orange_circle: Scaffold | Refile copy | +| `org-paste-special` | :orange_circle: Scaffold | Paste special | +| `org-set-tags` | :orange_circle: Scaffold | Set tags | +| `org-update-all-dblocks` | :orange_circle: Scaffold | Update all dblocks | +| `org-dblock-update` | :orange_circle: Scaffold | Update dblock | +| `org-dynamic-block-insert-dblock` | :orange_circle: Scaffold | Insert dblock | + ### Round 631 — Process Calculi (Pi-calculus, CSP) | Feature | Status | Notes | --- a/src/jerboa-emacs/editor-extra-final.ss +++ b/src/jerboa-emacs/editor-extra-final.ss @@ -34606,3 +34606,59 @@ (def (cmd-hoare-consequence app) (let* ((echo (app-state-echo app))) (echo-message! echo "Hoare: consequence"))) (def (cmd-hoare-sequence app) (let* ((echo (app-state-echo app))) (echo-message! echo "Hoare: sequence"))) (def (cmd-hoare-conditional app) (let* ((echo (app-state-echo app))) (echo-message! echo "Hoare: conditional"))) + +;; Round 642: Org Navigation (Headings, Elements) +(def (cmd-org-end-of-line app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: end of line"))) +(def (cmd-org-backward-heading-same-level app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: backward heading same level"))) +(def (cmd-org-forward-heading-same-level app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: forward heading same level"))) +(def (cmd-org-up-heading-safe app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: up heading"))) +(def (cmd-org-previous-visible-heading app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: previous visible heading"))) +(def (cmd-org-next-visible-heading app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: next visible heading"))) +(def (cmd-org-backward-element app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: backward element"))) +(def (cmd-org-forward-element app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: forward element"))) +(def (cmd-org-up-element app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: up element"))) +(def (cmd-org-down-element app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: down element"))) +;; Round 644: Org Toggle & Archive +(def (cmd-org-toggle-comment app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle comment"))) +(def (cmd-org-toggle-archive-tag app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle archive tag"))) +(def (cmd-org-toggle-ordered-property app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle ordered"))) +(def (cmd-org-toggle-tag app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle tag"))) +(def (cmd-org-toggle-item app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle item"))) +(def (cmd-org-toggle-inline-images app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle inline images"))) +(def (cmd-org-redisplay-inline-images app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: redisplay inline images"))) +(def (cmd-org-toggle-pretty-entities app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle pretty entities"))) +(def (cmd-org-archive-to-archive-sibling app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: archive to sibling"))) +(def (cmd-org-force-cycle-archived app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: force cycle archived"))) +;; Round 646: Org LaTeX & Display +(def (cmd-org-toggle-latex-fragment app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle LaTeX fragment"))) +(def (cmd-org-latex-preview app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: LaTeX preview"))) +(def (cmd-org-preview-latex-fragment app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: preview LaTeX fragment"))) +(def (cmd-org-entities-help app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: entities help"))) +(def (cmd-org-toggle-time-stamp-overlays app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle timestamp overlays"))) +(def (cmd-org-indent-mode app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: indent mode"))) +(def (cmd-org-indent-region app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: indent region"))) +(def (cmd-org-fill-paragraph app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: fill paragraph"))) +(def (cmd-org-sort-entries app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: sort entries"))) +(def (cmd-org-insert-structure-template app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: insert structure template"))) +;; Round 648: Org Edit & Source Blocks +(def (cmd-org-edit-special app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: edit special"))) +(def (cmd-org-edit-src-code app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: edit source code"))) +(def (cmd-org-edit-src-exit app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: exit source edit"))) +(def (cmd-org-ctrl-c-star app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: C-c * (toggle heading)"))) +(def (cmd-org-ctrl-c-ret app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: C-c RET (insert table rule)"))) +(def (cmd-org-drag-element-backward app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: drag element backward"))) +(def (cmd-org-drag-element-forward app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: drag element forward"))) +(def (cmd-org-mark-ring-push app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: push mark ring"))) +(def (cmd-org-mark-ring-goto app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: goto mark ring"))) +(def (cmd-org-copy-special app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: copy special"))) +;; Round 650: Org Misc (Effort, Notes, Dynamic Blocks) +(def (cmd-org-set-effort app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: set effort"))) +(def (cmd-org-inc-effort app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: increment effort"))) +(def (cmd-org-add-note app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: add note"))) +(def (cmd-org-evaluate-time-range app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: evaluate time range"))) +(def (cmd-org-refile-copy app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: refile copy"))) +(def (cmd-org-paste-special app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: paste special"))) +(def (cmd-org-set-tags app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: set tags"))) +(def (cmd-org-update-all-dblocks app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: update all dynamic blocks"))) +(def (cmd-org-dblock-update app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: update dynamic block"))) +(def (cmd-org-dynamic-block-insert-dblock app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: insert dynamic block"))) --- a/src/jerboa-emacs/editor-extra-modes.ss +++ b/src/jerboa-emacs/editor-extra-modes.ss @@ -33830,3 +33830,59 @@ (def (cmd-separation-frame-rule app) (let* ((echo (app-state-echo app))) (echo-message! echo "SepLogic: frame rule"))) (def (cmd-separation-biabduction app) (let* ((echo (app-state-echo app))) (echo-message! echo "SepLogic: biabduction"))) (def (cmd-separation-abstract app) (let* ((echo (app-state-echo app))) (echo-message! echo "SepLogic: abstract"))) + +;; Round 641: Org-mode Core (Cycling, Navigation, Structure) +(def (cmd-org-mode app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: enable org-mode"))) +(def (cmd-org-cycle app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: cycle visibility"))) +(def (cmd-org-global-cycle app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: global cycle"))) +(def (cmd-org-shifttab app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: shift-tab cycle"))) +(def (cmd-org-return app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: return"))) +(def (cmd-org-meta-return app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: meta-return"))) +(def (cmd-org-insert-item app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: insert item"))) +(def (cmd-org-goto app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: goto heading"))) +(def (cmd-org-switchb app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: switch to buffer"))) +(def (cmd-org-beginning-of-line app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: beginning of line"))) +;; Round 643: Org Subtree Operations (Cut, Copy, Paste, Move) +(def (cmd-org-move-subtree-up app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: move subtree up"))) +(def (cmd-org-move-subtree-down app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: move subtree down"))) +(def (cmd-org-demote-subtree app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: demote subtree"))) +(def (cmd-org-promote-subtree app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: promote subtree"))) +(def (cmd-org-cut-subtree app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: cut subtree"))) +(def (cmd-org-copy-subtree app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: copy subtree"))) +(def (cmd-org-paste-subtree app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: paste subtree"))) +(def (cmd-org-mark-subtree app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: mark subtree"))) +(def (cmd-org-mark-element app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: mark element"))) +(def (cmd-org-clone-subtree-with-time-shift app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: clone subtree with time shift"))) +;; Round 645: Org TODO & Priority +(def (cmd-org-todo app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle TODO state"))) +(def (cmd-org-show-todo-tree app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: show TODO tree"))) +(def (cmd-org-priority app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: set priority"))) +(def (cmd-org-priority-up app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: priority up"))) +(def (cmd-org-priority-down app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: priority down"))) +(def (cmd-org-deadline app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: set deadline"))) +(def (cmd-org-schedule app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: schedule"))) +(def (cmd-org-toggle-checkbox app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: toggle checkbox"))) +(def (cmd-org-update-checkbox-count app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: update checkbox count"))) +(def (cmd-org-update-statistics-cookies app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: update statistics"))) +;; Round 647: Org Shift/Meta Commands +(def (cmd-org-shiftup app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: shift-up"))) +(def (cmd-org-shiftdown app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: shift-down"))) +(def (cmd-org-shiftleft app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: shift-left"))) +(def (cmd-org-shiftright app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: shift-right"))) +(def (cmd-org-metaleft app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: meta-left"))) +(def (cmd-org-metaright app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: meta-right"))) +(def (cmd-org-shiftmetaleft app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: shift-meta-left"))) +(def (cmd-org-shiftmetaright app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: shift-meta-right"))) +(def (cmd-org-ctrl-c-ctrl-c app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: C-c C-c dispatch"))) +(def (cmd-org-ctrl-c-minus app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: C-c - (list bullet cycle)"))) +;; Round 649: Org Properties & IDs +(def (cmd-org-set-property-and-value app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: set property+value"))) +(def (cmd-org-entry-put app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: entry put"))) +(def (cmd-org-entry-get app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: entry get"))) +(def (cmd-org-entry-delete app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: entry delete"))) +(def (cmd-org-property-action app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: property action"))) +(def (cmd-org-insert-drawer app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: insert drawer"))) +(def (cmd-org-insert-property-drawer app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: insert property drawer"))) +(def (cmd-org-id-get-create app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: get/create ID"))) +(def (cmd-org-id-copy app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: copy ID"))) +(def (cmd-org-id-goto app) (let* ((echo (app-state-echo app))) (echo-message! echo "Org: goto ID"))) --- a/src/jerboa-emacs/editor-extra-regs2.ss +++ b/src/jerboa-emacs/editor-extra-regs2.ss @@ -13111,4 +13111,35 @@ ;; Round 640: Hoare Logic (register-command! 'hoare-triple cmd-hoare-triple) (register-command! 'hoare-pre cmd-hoare-pre) (register-command! 'hoare-post cmd-hoare-post) (register-command! 'hoare-weakest-pre cmd-hoare-weakest-pre) (register-command! 'hoare-strongest-post cmd-hoare-strongest-post) (register-command! 'hoare-loop-invariant cmd-hoare-loop-invariant) (register-command! 'hoare-frame cmd-hoare-frame) (register-command! 'hoare-consequence cmd-hoare-consequence) (register-command! 'hoare-sequence cmd-hoare-sequence) (register-command! 'hoare-conditional cmd-hoare-conditional) + + ;; Round 641: Org-mode Core + (register-command! 'org-mode cmd-org-mode) (register-command! 'org-cycle cmd-org-cycle) (register-command! 'org-global-cycle cmd-org-global-cycle) (register-command! 'org-shifttab cmd-org-shifttab) (register-command! 'org-return cmd-org-return) + (register-command! 'org-meta-return cmd-org-meta-return) (register-command! 'org-insert-item cmd-org-insert-item) (register-command! 'org-goto cmd-org-goto) (register-command! 'org-switchb cmd-org-switchb) (register-command! 'org-beginning-of-line cmd-org-beginning-of-line) + ;; Round 642: Org Navigation + (register-command! 'org-end-of-line cmd-org-end-of-line) (register-command! 'org-backward-heading-same-level cmd-org-backward-heading-same-level) (register-command! 'org-forward-heading-same-level cmd-org-forward-heading-same-level) (register-command! 'org-up-heading-safe cmd-org-up-heading-safe) (register-command! 'org-previous-visible-heading cmd-org-previous-visible-heading) + (register-command! 'org-next-visible-heading cmd-org-next-visible-heading) (register-command! 'org-backward-element cmd-org-backward-element) (register-command! 'org-forward-element cmd-org-forward-element) (register-command! 'org-up-element cmd-org-up-element) (register-command! 'org-down-element cmd-org-down-element) + ;; Round 643: Org Subtree Operations + (register-command! 'org-move-subtree-up cmd-org-move-subtree-up) (register-command! 'org-move-subtree-down cmd-org-move-subtree-down) (register-command! 'org-demote-subtree cmd-org-demote-subtree) (register-command! 'org-promote-subtree cmd-org-promote-subtree) (register-command! 'org-cut-subtree cmd-org-cut-subtree) + (register-command! 'org-copy-subtree cmd-org-copy-subtree) (register-command! 'org-paste-subtree cmd-org-paste-subtree) (register-command! 'org-mark-subtree cmd-org-mark-subtree) (register-command! 'org-mark-element cmd-org-mark-element) (register-command! 'org-clone-subtree-with-time-shift cmd-org-clone-subtree-with-time-shift) + ;; Round 644: Org Toggle & Archive + (register-command! 'org-toggle-comment cmd-org-toggle-comment) (register-command! 'org-toggle-archive-tag cmd-org-toggle-archive-tag) (register-command! 'org-toggle-ordered-property cmd-org-toggle-ordered-property) (register-command! 'org-toggle-tag cmd-org-toggle-tag) (register-command! 'org-toggle-item cmd-org-toggle-item) + (register-command! 'org-toggle-inline-images cmd-org-toggle-inline-images) (register-command! 'org-redisplay-inline-images cmd-org-redisplay-inline-images) (register-command! 'org-toggle-pretty-entities cmd-org-toggle-pretty-entities) (register-command! 'org-archive-to-archive-sibling cmd-org-archive-to-archive-sibling) (register-command! 'org-force-cycle-archived cmd-org-force-cycle-archived) + ;; Round 645: Org TODO & Priority + (register-command! 'org-todo cmd-org-todo) (register-command! 'org-show-todo-tree cmd-org-show-todo-tree) (register-command! 'org-priority cmd-org-priority) (register-command! 'org-priority-up cmd-org-priority-up) (register-command! 'org-priority-down cmd-org-priority-down) + (register-command! 'org-deadline cmd-org-deadline) (register-command! 'org-schedule cmd-org-schedule) (register-command! 'org-toggle-checkbox cmd-org-toggle-checkbox) (register-command! 'org-update-checkbox-count cmd-org-update-checkbox-count) (register-command! 'org-update-statistics-cookies cmd-org-update-statistics-cookies) + ;; Round 646: Org LaTeX & Display + (register-command! 'org-toggle-latex-fragment cmd-org-toggle-latex-fragment) (register-command! 'org-latex-preview cmd-org-latex-preview) (register-command! 'org-preview-latex-fragment cmd-org-preview-latex-fragment) (register-command! 'org-entities-help cmd-org-entities-help) (register-command! 'org-toggle-time-stamp-overlays cmd-org-toggle-time-stamp-overlays) + (register-command! 'org-indent-mode cmd-org-indent-mode) (register-command! 'org-indent-region cmd-org-indent-region) (register-command! 'org-fill-paragraph cmd-org-fill-paragraph) (register-command! 'org-sort-entries cmd-org-sort-entries) (register-command! 'org-insert-structure-template cmd-org-insert-structure-template) + ;; Round 647: Org Shift/Meta Commands + (register-command! 'org-shiftup cmd-org-shiftup) (register-command! 'org-shiftdown cmd-org-shiftdown) (register-command! 'org-shiftleft cmd-org-shiftleft) (register-command! 'org-shiftright cmd-org-shiftright) (register-command! 'org-metaleft cmd-org-metaleft) + (register-command! 'org-metaright cmd-org-metaright) (register-command! 'org-shiftmetaleft cmd-org-shiftmetaleft) (register-command! 'org-shiftmetaright cmd-org-shiftmetaright) (register-command! 'org-ctrl-c-ctrl-c cmd-org-ctrl-c-ctrl-c) (register-command! 'org-ctrl-c-minus cmd-org-ctrl-c-minus) + ;; Round 648: Org Edit & Source Blocks + (register-command! 'org-edit-special cmd-org-edit-special) (register-command! 'org-edit-src-code cmd-org-edit-src-code) (register-command! 'org-edit-src-exit cmd-org-edit-src-exit) (register-command! 'org-ctrl-c-star cmd-org-ctrl-c-star) (register-command! 'org-ctrl-c-ret cmd-org-ctrl-c-ret) + (register-command! 'org-drag-element-backward cmd-org-drag-element-backward) (register-command! 'org-drag-element-forward cmd-org-drag-element-forward) (register-command! 'org-mark-ring-push cmd-org-mark-ring-push) (register-command! 'org-mark-ring-goto cmd-org-mark-ring-goto) (register-command! 'org-copy-special cmd-org-copy-special) + ;; Round 649: Org Properties & IDs + (register-command! 'org-set-property-and-value cmd-org-set-property-and-value) (register-command! 'org-entry-put cmd-org-entry-put) (register-command! 'org-entry-get cmd-org-entry-get) (register-command! 'org-entry-delete cmd-org-entry-delete) (register-command! 'org-property-action cmd-org-property-action) + (register-command! 'org-insert-drawer cmd-org-insert-drawer) (register-command! 'org-insert-property-drawer cmd-org-insert-property-drawer) (register-command! 'org-id-get-create cmd-org-id-get-create) (register-command! 'org-id-copy cmd-org-id-copy) (register-command! 'org-id-goto cmd-org-id-goto) + ;; Round 650: Org Misc + (register-command! 'org-set-effort cmd-org-set-effort) (register-command! 'org-inc-effort cmd-org-inc-effort) (register-command! 'org-add-note cmd-org-add-note) (register-command! 'org-evaluate-time-range cmd-org-evaluate-time-range) (register-command! 'org-refile-copy cmd-org-refile-copy) + (register-command! 'org-paste-special cmd-org-paste-special) (register-command! 'org-set-tags cmd-org-set-tags) (register-command! 'org-update-all-dblocks cmd-org-update-all-dblocks) (register-command! 'org-dblock-update cmd-org-dblock-update) (register-command! 'org-dynamic-block-insert-dblock cmd-org-dynamic-block-insert-dblock) )