From aab5bfd074e57d06a79e39d7c7c4760e1f385a06 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 17 Oct 2022 21:41:28 -0500
Subject: Bankruptcy 9

---
 lisp/+mwim.el | 42 ------------------------------------------
 1 file changed, 42 deletions(-)
 delete mode 100644 lisp/+mwim.el

(limited to 'lisp/+mwim.el')

diff --git a/lisp/+mwim.el b/lisp/+mwim.el
deleted file mode 100644
index 97a2b04..0000000
--- a/lisp/+mwim.el
+++ /dev/null
@@ -1,42 +0,0 @@
-;;; +mwim.el --- Extras -*- lexical-binding: t; -*-
-
-;;; Commentary:
-
-;;; Code:
-
-(require 'seq)
-
-(defgroup +mwim nil
-  "Extra `mwim' customizations."
-  :group 'mwim)
-
-(defcustom +mwim-passthrough-modes nil
-  "Modes to not move-where-I-mean."
-  :type '(repeat function))
-
-(defun +mwim-beginning-maybe (&optional arg)
-  "Perform `mwim-beginning', maybe.
-Will just do \\[beginning-of-line] in one of
-`+mwim-passthrough-modes'."
-  (interactive)
-  (if (apply #'derived-mode-p +mwim-passthrough-modes)
-      (let ((this-mode-map (symbol-value (intern (format "%s-map" major-mode))))
-            (key "C-a"))
-        (call-interactively (or (keymap-lookup this-mode-map key t t)
-                     (keymap-lookup (current-global-map) key t t))))
-    (call-interactively #'mwim-beginning)))
-
-(defun +mwim-end-maybe (&optional arg)
-  "Perform `mwim-beginning', maybe.
-Will just do \\[end-of-line] in one of
-`+mwim-passthrough-modes'."
-  (interactive)
-  (if (apply #'derived-mode-p +mwim-passthrough-modes)
-      (let ((this-mode-map (symbol-value (intern (format "%s-map" major-mode))))
-            (key "C-e"))
-        (call-interactively (or (keymap-lookup this-mode-map key t t)
-                                (keymap-lookup (current-global-map) key t t))))
-    (call-interactively #'mwim-end)))
-
-(provide '+mwim)
-;;; +mwim.el ends here
-- 
cgit 1.4.1-21-gabe81