From f0370c8e513014cdf88888c39458b9d833319d3d Mon Sep 17 00:00:00 2001
From: Matt Nish-Lapidus <matt@emenel.ca>
Date: Tue, 4 Apr 2023 17:38:52 -0400
Subject: [PATCH] tweaks

---
 bindings.el |  9 +++++++++
 config.el   | 19 ++++---------------
 2 files changed, 13 insertions(+), 15 deletions(-)

diff --git a/bindings.el b/bindings.el
index f9438c4..c0b4c2b 100644
--- a/bindings.el
+++ b/bindings.el
@@ -401,6 +401,15 @@
       "s-<return>" #'split-window-below
       "s-<mouse-1>" #'+fold/toggle)
 
+;; remove default Lispy mode bindings
+(map! :map lispy-mode-map
+      "M-<left>" nil
+      "M-<right>" nil)
+(map! :map lispy-mode-map-lispy
+      "M-<left>" nil
+      "M-<right>" nil)
+
+
 (after! which-key
   (let ((prefix-re (regexp-opt (list doom-leader-key doom-leader-alt-key))))
     (cl-pushnew `((,(format "\\`\\(?:C-w\\|%s w\\) m\\'" prefix-re))
diff --git a/config.el b/config.el
index a03d6eb..79140f9 100644
--- a/config.el
+++ b/config.el
@@ -25,10 +25,6 @@
 
 (setq org-directory "~/Library/Mobile Documents/iCloud~md~obsidian/Documents/Primary/org/")
 
-;; quick function for removing all blank lines in a buffer
-(defun mnl/remove-all-blank-lines ()
-  (flush-lines "^$"))
-
 ;; Modeline
 ;; - add current workspace name
 ;; - add major mode icon
@@ -36,6 +32,9 @@
   (setq doom-modeline-persp-name t
         doom-modeline-major-mode-icon t))
 
+;; set default frame size on launch
+(setq default-frame-alist '( (left . 0) (top . 0) (height . 48) (width . 160) ))
+
 ;; fixing compat issue for corfu in emacs28
 ;; (defalias 'compat-string-width 'string-width)
 
@@ -52,6 +51,7 @@
 (after! which-key
   (setq which-key-idle-delay 0.3))
 
+;; some defaults for cursor size, scrolling, and buffer handling
 (setq x-stretch-cursor t
       kill-buffer-delete-auto-save-files t
       scroll-conservatively 0)
@@ -69,15 +69,6 @@
 ;; import all my customized keybindings based on doom evil mode, but without evil.
 (load! "bindings.el")
 
-;; Lispy mode
-(setq aw-dispatch-always t)
-(map! :map lispy-mode-map
-      "M-<left>" nil
-      "M-<right>" nil)
-(map! :map lispy-mode-map-lispy
-      "M-<left>" nil
-      "M-<right>" nil)
-
 (setq treemacs-follow-mode t)
 (setq treemacs-project-follow-mode t)
 
@@ -122,8 +113,6 @@
 	"s-M-<right>" 'centaur-tabs-forward
 	"s-M-<left>" 'centaur-tabs-backward))
 
-(setq default-frame-alist '( (left . 0) (top . 0) (height . 48) (width . 160) ))
-
 ;; use kitty for terminal-here
 (setq terminal-here-mac-terminal-command '("kitty"))