diff options
| author | Craig Jennings <c@cjennings.net> | 2026-02-18 01:13:30 -0600 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2026-02-18 01:13:30 -0600 |
| commit | 6bf2688d0b3e4fef82671fb70e1aa883b0c90018 (patch) | |
| tree | e8bb1cb720813a3f9bc28c3d5adcbddc8a0cfe62 /modules/org-config.el | |
| parent | 5c111165cd9275aa9b50843d2ba628bff4795f6d (diff) | |
fix(org): remap date picker keys — . for today, <> for days, M-,/. for months
Unbind comma, restore . to goto-today, use angle brackets for day
navigation, and M-comma/M-dot for month navigation.
Diffstat (limited to 'modules/org-config.el')
| -rw-r--r-- | modules/org-config.el | 19 |
1 files changed, 7 insertions, 12 deletions
diff --git a/modules/org-config.el b/modules/org-config.el index a4f98310..f1e90973 100644 --- a/modules/org-config.el +++ b/modules/org-config.el @@ -154,24 +154,19 @@ ("c i" . org-table-insert-column) ("c d" . org-table-delete-column)) - ;; backward and forward day are ',' and '.' - ;; shift & meta moves by week or year - ;; C-. jumps to today - ;; original keybindings blocked by windmove keys - ;; these are consistent with plain-old calendar mode + ;; . jumps to today, < and > move by day, M-, and M-. move by month + ;; original shift-arrow keybindings blocked by windmove keys (:map org-read-date-minibuffer-local-map - ("," . (lambda () (interactive) - (org-eval-in-calendar '(calendar-backward-day 1)))) ("." . (lambda () (interactive) - (org-eval-in-calendar '(calendar-forward-day 1)))) + (org-eval-in-calendar '(calendar-goto-today)))) ("<" . (lambda () (interactive) - (org-eval-in-calendar '(calendar-backward-month 1)))) + (org-eval-in-calendar '(calendar-backward-day 1)))) (">" . (lambda () (interactive) - (org-eval-in-calendar '(calendar-forward-month 1)))) + (org-eval-in-calendar '(calendar-forward-day 1)))) ("M-," . (lambda () (interactive) - (org-eval-in-calendar '(calendar-backward-year 1)))) + (org-eval-in-calendar '(calendar-backward-month 1)))) ("M-." . (lambda () (interactive) - (org-eval-in-calendar '(calendar-forward-year 1))))) + (org-eval-in-calendar '(calendar-forward-month 1))))) :init ;; windmove's keybindings conflict with org-agenda-todo-nextset/previousset keybindings |