From 986af5d0e5f0499ccae4bfb2e782c22fb053bc71 Mon Sep 17 00:00:00 2001
From: Mountain Man <43313373+MountainMan1312@users.noreply.github.com>
Date: Mon, 19 Jun 2023 14:00:56 -0400
Subject: Fix IJKL equivalent of M-<arrow keys> for org heading movement

---
 init.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/init.el b/init.el
index 952e8ad..f428a54 100644
--- a/init.el
+++ b/init.el
@@ -1307,9 +1307,13 @@
 
 ;; Fix "IK" M-arrow movement for org-mode
 (define-key org-mode-map (kbd "s-M-i") (kbd "M-<up>"))
+(define-key org-mode-map (kbd "s-M-I") (kbd "M-S-<up>"))
 (define-key org-mode-map (kbd "s-M-k") (kbd "M-<down>"))
+(define-key org-mode-map (kbd "s-M-K") (kbd "M-S-<down>"))
 (define-key org-mode-map (kbd "s-M-j") (kbd "M-<left>"))
+(define-key org-mode-map (kbd "s-M-J") (kbd "M-S-<left>"))
 (define-key org-mode-map (kbd "s-M-l") (kbd "M-<right>"))
+(define-key org-mode-map (kbd "s-M-L") (kbd "M-S-<right>"))
 
 
 ;; ---------------------------------
-- 
cgit v1.2.3