emacs: magit: looks for repos in direct subdirs of ~/src/git/ too

[~bandali/configs] / .emacs.d / init.el

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 8b0df02..21a1fff 100644 (file)
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -226,6 +226,12 @@ For disabling the behaviour for certain buffers and/or modes."
   (make-local-variable 'mouse-autoselect-window)
   (setq mouse-autoselect-window nil))
 
   (make-local-variable 'mouse-autoselect-window)
   (setq mouse-autoselect-window nil))
 

+(defun b/kill-current-buffer ()
+  "Kill the current buffer."
+  ;; also see https://redd.it/64xb3q
+  (interactive)
+  (kill-buffer (current-buffer)))
+

 \f
 ;;; Defaults
 
 \f
 ;;; Defaults
 


@@ -497,7 +503,7 @@ For disabling the behaviour for certain buffers and/or modes."
  ("C-S-h C" . describe-char)
  ("C-S-h F" . describe-face)
 
  ("C-S-h C" . describe-char)
  ("C-S-h F" . describe-face)
 

- ("C-x k"   . kill-this-buffer)
+ ("C-x k"   . b/kill-current-buffer)

  ("C-x K"   . kill-buffer)
  ("C-x s"   . save-buffer)
  ("C-x S"   . save-some-buffers)
  ("C-x K"   . kill-buffer)
  ("C-x s"   . save-buffer)
  ("C-x S"   . save-some-buffers)


@@ -851,7 +857,7 @@ around if needed."
   ;;                         'magit-insert-untracked-files
   ;;                         'append)
   (setq magit-repository-directories '(("~/" . 0)
   ;;                         'magit-insert-untracked-files
   ;;                         'append)
   (setq magit-repository-directories '(("~/" . 0)

-                                       ("~/src/git/" . 1)))
+                                       ("~/src/git/" . 2)))

   (nconc magit-section-initial-visibility-alist
          '(([unpulled status] . show)
            ([unpushed status] . show)))
   (nconc magit-section-initial-visibility-alist
          '(([unpulled status] . show)
            ([unpushed status] . show)))


@@ -2423,6 +2429,8 @@ https://csclub.uwaterloo.ca/~abandali")
            (address "mab@gnu.org"))
           ("nnimap\\+gnu:l\\..*"
            (signature nil))
            (address "mab@gnu.org"))
           ("nnimap\\+gnu:l\\..*"
            (signature nil))

+          ("nnimap\\+gnu:.*"
+           (organization "GNU"))

           ((header "subject" "ThankCRM")
            (to "webmasters-comment@gnu.org")
            (body "")
           ((header "subject" "ThankCRM")
            (to "webmasters-comment@gnu.org")
            (body "")


@@ -2683,6 +2691,7 @@ https://csclub.uwaterloo.ca/~abandali")
     (erc-cmd-DEOP (format "%s" (erc-current-nick))))
   (add-to-list 'erc-modules 'keep-place)
   (add-to-list 'erc-modules 'notifications)
     (erc-cmd-DEOP (format "%s" (erc-current-nick))))
   (add-to-list 'erc-modules 'keep-place)
   (add-to-list 'erc-modules 'notifications)

+  (add-to-list 'erc-modules 'smiley)

   (add-to-list 'erc-modules 'spelling)
   (add-to-list 'erc-modules 'scrolltoplace)
   (erc-update-modules))
   (add-to-list 'erc-modules 'spelling)
   (add-to-list 'erc-modules 'scrolltoplace)
   (erc-update-modules))