From 434260729e3328b19a286904ab5e3c04f6314b9e Mon Sep 17 00:00:00 2001
From: Adam Goldsmith <adam@adamgoldsmith.name>
Date: Thu, 23 Aug 2018 23:54:29 -0400
Subject: [PATCH] Improve bindings, esp. for UHK

---
 .emacs.d/init-hydra.el | 6 ++++++
 .emacs.d/init.el       | 9 ++++++++-
 2 files changed, 14 insertions(+), 1 deletion(-)

diff --git a/.emacs.d/init-hydra.el b/.emacs.d/init-hydra.el
index c71bde7..858bbd5 100644
--- a/.emacs.d/init-hydra.el
+++ b/.emacs.d/init-hydra.el
@@ -57,11 +57,17 @@ Mark (+S=unmark): _<up>_:prev _<down>_:next _<left>_:skip prev _<right>_:skip ne
  ("S" mc/sort-regions)
 
  ("<down>" mc/mark-next-like-this)
+ ("C-n" mc/mark-next-like-this)
  ("<up>" mc/mark-previous-like-this)
+ ("C-p" mc/mark-previous-like-this)
  ("S-<down>" mc/unmark-previous-like-this)
+ ("C-S-n" mc/unmark-previous-like-this)
  ("S-<up>" mc/unmark-next-like-this)
+ ("C-S-p" mc/unmark-next-like-this)
  ("<right>" mc/skip-to-next-like-this)
+ ("M-n" mc/skip-to-next-like-this)
  ("<left>" mc/skip-to-previous-like-this)
+ ("M-p" mc/skip-to-previous-like-this)
 
  ("<return>" nil))
 
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 90885cf..2e263d5 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -245,6 +245,10 @@
 (use-package antlr-mode
   :mode "\\.g4\\'")
 
+(use-package paragraphs
+  :bind (("M-p" . backward-paragraph)
+         ("M-n" . forward-paragraph)))
+
 ;;;; external packages (required)
 (use-package company :ensure
   :config
@@ -341,7 +345,7 @@
       (insert old-path))))
 
 (use-package ace-window :ensure
-  :bind ("M-p" . ace-window))
+  :bind ("M-S-p" . ace-window))
 
 (use-package undo-tree :ensure
   :config
@@ -431,6 +435,9 @@
   (bind-key "C-x 2" 'split-window-below-i3)
   (bind-key "C-x 3" 'split-window-right-i3))
 
+(use-package crux :ensure
+  :bind (("C-a" . crux-move-beginning-of-line)))
+
 (use-package lsp-mode :ensure
   :config
   (use-package company-lsp :ensure