From 2c79c18bf8e040fab316a18e145fbbb769a6b865 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Mon, 22 Feb 2021 06:23:32 +0000
Subject: init: one less "misc" section

---
 init.org | 39 ++++++++++++++++-----------------------
 1 file changed, 16 insertions(+), 23 deletions(-)

diff --git a/init.org b/init.org
index 26b60b2..087dadb 100644
--- a/init.org
+++ b/init.org
@@ -1144,6 +1144,17 @@
        (global-set-key "\C-ce" 'fc-eval-and-replace)
     #+END_SRC
 * Buffers
+*** cursor and mark
+    #+begin_src emacs-lisp
+      (transient-mark-mode -1)
+      (setq cursor-in-non-selected-windows nil)
+      (blink-cursor-mode -1)
+    #+end_src
+*** uniquifiy
+    #+begin_src emacs-lisp
+      (require 'uniquify)
+      (setq uniquify-buffer-name-style 'forward)
+    #+end_src
 *** autosave
     #+BEGIN_SRC emacs-lisp
     (setq auto-save-list-file-prefix "~/.emacs.d/auto-save-list/.saves-"
@@ -1192,28 +1203,6 @@
       (setq image-use-external-converter t)
       (setq widget-image-enable nil)
     #+end_src
-*** misc
-      #+begin_src emacs-lisp
-        (require 'uniquify)
-        (setq uniquify-buffer-name-style 'forward)
-        (require 'paren)
-        (show-paren-mode t)
-        (require 'cus-edit)
-        (setq custom-buffer-done-function 'kill-buffer)
-
-        (setq cursor-in-non-selected-windows nil)
-
-        (blink-cursor-mode -1)
-        (transient-mark-mode -1)
-
-        (defun jao-kill-matching-buffers (rex)
-          (interactive (list (read-regexp "Filenames matching: "
-                                          (or (file-name-directory (buffer-file-name))
-                                              ""))))
-          (dolist (b (buffer-list))
-            (when (string-match rex (or (buffer-file-name b) ""))
-              (kill-buffer b))))
-      #+end_src
 *** same mode
     #+begin_src emacs-lisp
       (defun jao-buffer-same-mode (&optional mode)
@@ -1335,6 +1324,7 @@
                  (switch-window-threshold 3))
         :bind (("M-o" . switch-window)
                ("M-O" . switch-window-then-swap-buffer)
+               ("H-s-o" . switch-window)
                ("H-s-O" . switch-window-then-swap-buffer)
                ("C-x 4 d" . switch-window-then-dired)
                ("C-x 4 f" . switch-window-then-find-file)
@@ -3151,8 +3141,11 @@
         :init (add-hook 'prog-mode-hook #'smartscan-mode)
         :diminish)
     #+end_src
-*** Paredit
+*** Paredit and parens
     #+begin_src emacs-lisp
+      (require 'paren)
+      (show-paren-mode t)
+
       (use-package paredit
         :ensure t
         :commands paredit-mode
-- 
cgit v1.2.3