From a85aae30b9ad8bf97b80005877f54f57940c5fe8 Mon Sep 17 00:00:00 2001
From: Howard Abrams <howard.abrams@workday.com>
Date: Tue, 4 Jan 2022 16:13:44 -0800
Subject: [PATCH] Org commands off the general leader

Shamelessly stolen from Doom Emacs
---
 ha-org.org | 42 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)

diff --git a/ha-org.org b/ha-org.org
index b519a67..ea3b4e7 100644
--- a/ha-org.org
+++ b/ha-org.org
@@ -330,8 +330,50 @@ Bindings specific to org files:
 #+BEGIN_SRC emacs-lisp :tangle no
   (ha-org-leader
       "e" '("exports"     . org-export-dispatch)
+      "I" '("insert id" .  org-id-get-create)
       "l" '("insert link" . org-insert-link)
+      "n" '("store link" .  org-store-link)
       "o" '("goto link"   . ace-link-org)
+      "p" '("set property" .  org-set-property)
+      "q" '("set tags" .  org-set-tags-command)
+      "t" '("todo"   . org-todo)
+      "T" '("list todos" .  org-todo-list)
+
+      "h" '("toggle heading" .  org-toggle-heading)
+      "i" '("toggle item" .  org-toggle-item)
+      "x" '("toggle checkbox" .  org-toggle-checkbox)
+
+      "." '("goto heading" . consult-org-heading)
+      "/" '("agenda" . consult-org-agenda)
+      "'" '("edit" . org-edit-special)
+      "*" '("C-c *" . org-ctrl-c-star)
+      "+" '("C-c -" . org-ctrl-c-minus)
+
+      "d"  '(:ignore t :which-key "dates")
+      "d s" '("schedule" . org-schedule)
+      "d d" '("deadline" . org-deadline)
+      "d t" '("timestamp" . org-time-stamp)
+      "d T" '("inactive time" . org-time-stamp-inactive)
+
+
+      "b"  '(:ignore t :which-key "tables")
+      "b -" '("insert hline" . org-table-insert-hline)
+      "b a" '("align" . org-table-align)
+      "b b" '("blank field" . org-table-blank-field)
+      "b c" '("create teable" . org-table-create-or-convert-from-region)
+      "b e" '("edit field" . org-table-edit-field)
+      "b f" '("edit formula" . org-table-edit-formulas)
+      "b h" '("field info" . org-table-field-info)
+      "b s" '("sort lines" . org-table-sort-lines)
+      "b r" '("recalculate" . org-table-recalculate)
+      "b d"  '(:ignore t :which-key "delete")
+      "b d c" '("delete column" . org-table-delete-column)
+      "b d r" '("delete row" . org-table-kill-row)
+      "b i"  '(:ignore t :which-key "insert")
+      "b i c" '("insert column" . org-table-insert-column)
+      "b i h" '("insert hline" . org-table-insert-hline)
+      "b i r" '("insert row" . org-table-insert-row)
+      "b i H" '("insert hline ↓" . org-table-hline-and-move)
 
       "n"  '(:ignore t :which-key "narrow")
       "n s" '("subtree" . org-narrow-to-subtree)