[emacs][wip] update custom

diff --git a/etc/custom.el b/etc/custom.el
index b28cc4d..013afe6 100644 (file)
--- a/etc/custom.el
+++ b/etc/custom.el
@@ -10,6 +10,8 @@
  '(company-idle-delay 0.3)
  '(company-minimum-prefix-length 1)
  '(company-selection-wrap-around t)
  '(company-idle-delay 0.3)
  '(company-minimum-prefix-length 1)
  '(company-selection-wrap-around t)

+ '(eshell-hist-ignoredups t t)
+ '(eshell-input-filter 'eshell-input-filter-initial-space t)

  '(ibuffer-formats
    '((mark modified read-only locked " "
            (name 18 18 :left :elide)
  '(ibuffer-formats
    '((mark modified read-only locked " "
            (name 18 18 :left :elide)


@@ -20,13 +22,19 @@
            " " filename-and-process)
      (mark " "
            (name 16 -1)
            " " filename-and-process)
      (mark " "
            (name 16 -1)

-           " " filename)))
+           " " filename)) t)

  '(ibuffer-saved-filter-groups
    '(("default"
       ("dired"
        (mode . dired-mode))
       ("org"
        (mode . org-mode))
  '(ibuffer-saved-filter-groups
    '(("default"
       ("dired"
        (mode . dired-mode))
       ("org"
        (mode . org-mode))

+      ("gnus"
+       (or
+        (mode . gnus-group-mode)
+        (mode . gnus-summary-mode)
+        (mode . gnus-article-mode)
+        (mode . message-mode)))

       ("web"
        (or
         (mode . web-mode)
       ("web"
        (or
         (mode . web-mode)


@@ -36,24 +44,28 @@
       ("shell"
        (or
         (mode . eshell-mode)
       ("shell"
        (or
         (mode . eshell-mode)

-        (mode . shell-mode)))
-      ("notmuch"
-       (name . "*notmuch*"))
+        (mode . shell-mode)
+        (mode . term-mode)))

       ("programming"
        (or
         (mode . python-mode)
       ("programming"
        (or
         (mode . python-mode)

+        (mode . c-mode)

         (mode . c++-mode)
         (mode . c++-mode)

-        (mode . emacs-lisp-mode)))
+        (mode . emacs-lisp-mode)
+        (mode . scheme-mode)
+        (mode . haskell-mode)
+        (mode . lean-mode)))

       ("emacs"
        (or
         (name . "^\\*scratch\\*$")
       ("emacs"
        (or
         (name . "^\\*scratch\\*$")

-        (name . "^\\*Messages\\*$")))
-      ("slack"
-       (or
-        (name . "^\\*Slack*"))))))
+        (name . "^\\*Messages\\*$"))))) t)
+ '(ls-lisp-dirs-first t t)

  '(org-latex-packages-alist '(("" "listings") ("" "color")))
  '(safe-local-variable-values
  '(org-latex-packages-alist '(("" "listings") ("" "color")))
  '(safe-local-variable-values

-   '((eval add-hook 'after-save-hook 'org-beamer-export-to-latex t t)
+   '((eval when
+           (featurep 'typo
+                     (typo-mode -1)))
+     (eval add-hook 'after-save-hook 'org-beamer-export-to-latex t t)

      (eval setq org-latex-prefer-user-labels t)
      (eval add-hook 'after-save-hook 'org-latex-export-to-latex t t)
      (org-hugo-footer . "
      (eval setq org-latex-prefer-user-labels t)
      (eval add-hook 'after-save-hook 'org-latex-export-to-latex t t)
      (org-hugo-footer . "


@@ -68,13 +80,6 @@
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  '(dired-directory ((t (:weight semi-bold))))
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  '(dired-directory ((t (:weight semi-bold))))

- ;; '(font-lock-comment-face ((t (:foreground "grey" :weight semi-bold))))
- ;; '(ivy-minibuffer-match-face-2 ((t (:background "#e99ce8" :weight semi-bold))))
- ;; '(ivy-minibuffer-match-face-3 ((t (:background "#bbbbff" :weight semi-bold))))
- ;; '(ivy-minibuffer-match-face-4 ((t (:background "#ffbbff" :weight semi-bold))))

  '(magit-diff-file-heading ((t (:weight normal))))
  '(magit-diff-file-heading ((t (:weight normal))))

- ;; '(message-header-cc ((t (:foreground "#333" :weight normal))))
- ;; '(message-header-subject ((t (:foreground "navy blue" :weight semi-bold))))
- ;; '(message-header-to ((t (:foreground "MidnightBlue" :weight semi-bold))))

  '(quote (org-block-begin-line ((t (:foreground "#5a5b5a" :background "#1d1f21")))))
  '(widget-button ((t (:weight semi-bold)))))
  '(quote (org-block-begin-line ((t (:foreground "#5a5b5a" :background "#1d1f21")))))
  '(widget-button ((t (:weight semi-bold)))))