emacs: update custom.el

1 files changed, 116 insertions, 59 deletions

diff --git a/.emacs.d/etc/custom.el b/.emacs.d/etc/custom.el
index 65623e8..a831542 100644
--- a/.emacs.d/etc/custom.el
+++ b/.emacs.d/etc/custom.el
@@ -4,48 +4,64 @@
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  '(abbrev-file-name "/home/bandali/.emacs.d/var/abbrev.el")
- '(auth-sources (quote ("~/.authinfo.gpg")))
- '(company-dabbrev-char-regexp "\\sw\\|\\s_\\|[-_]")
- '(company-dabbrev-downcase nil)
- '(company-dabbrev-ignore-case nil)
+ '(auth-sources '("~/.authinfo.gpg"))
+ '(authinfo-hidden "\\(?:client-secret\\|password\\|token\\)")
+ '(auto-revert-verbose nil)
+ '(auto-save-file-name-transforms '((".*" "/home/bandali/.emacs.d/var/auto-save/" t)))
+ '(backup-by-copying t)
+ '(company-dabbrev-char-regexp "\\sw\\|\\s_\\|[-_]" t)
+ '(company-dabbrev-downcase nil t)
+ '(company-dabbrev-ignore-case nil t)
  '(company-minimum-prefix-length 1)
  '(company-selection-wrap-around t)
+ '(debpaste-paste-is-hidden t t)
+ '(delete-old-versions t)
+ '(display-battery-mode t)
+ '(display-time-mode t)
+ '(dmenu-prompt-string "run: " t)
+ '(dmenu-save-file "/home/bandali/.emacs.d/var/dmenu-items" t)
  '(ebdb-gnus-window-configuration
-   (quote
-    (article
+   '(article
      (vertical 1.0
                (summary 0.25 point)
                (horizontal 1.0
                            (article 1.0)
-                           (ebdb-gnus 0.3))))))
- '(ediff-split-window-function (quote split-window-horizontally))
- '(ediff-window-setup-function (quote ediff-setup-windows-plain))
- '(epa-pinentry-mode (quote loopback))
+                           (ebdb-gnus 0.3)))))
+ '(ebdb-gnus-window-size 0.3 t)
+ '(ebdb-mua-pop-up t)
+ '(ediff-split-window-function 'split-window-horizontally t)
+ '(ediff-window-setup-function 'ediff-setup-windows-plain t)
+ '(epa-pinentry-mode 'loopback)
  '(epg-gpg-program "/home/bandali/.guix-profile/bin/gpg")
- '(epg-pinentry-mode (quote loopback) t)
- '(erc-fill-function (quote erc-fill-static))
+ '(epg-pinentry-mode 'loopback)
+ '(erc-fill-column 77)
+ '(erc-fill-function 'erc-fill-static)
  '(erc-fill-static-center 18)
- '(erc-join-buffer (quote bury))
- '(erc-lurker-hide-list (quote ("JOIN" "PART" "QUIT")))
+ '(erc-join-buffer 'bury)
+ '(erc-lurker-hide-list '("JOIN" "PART" "QUIT"))
  '(erc-nick "bandali")
- '(erc-pcomplete-nick-postfix ",")
+ '(erc-pcomplete-nick-postfix ", ")
+ '(erc-prompt "erc>")
  '(erc-rename-buffers t)
  '(erc-server-reconnect-attempts 5)
  '(erc-server-reconnect-timeout 3)
  '(erc-track-enable-keybindings nil)
  '(erc-track-exclude-types
-   (quote
-    ("JOIN" "MODE" "NICK" "PART" "QUIT" "324" "329" "332" "333" "353" "477")))
- '(erc-track-priority-faces-only (quote all))
+   '("JOIN" "MODE" "NICK" "PART" "QUIT" "324" "329" "332" "333" "353" "477"))
+ '(erc-track-position-in-mode-line t)
+ '(erc-track-priority-faces-only 'all)
  '(erc-track-shorten-function nil)
  '(eshell-directory-name "/home/bandali/.emacs.d/var/eshell/")
  '(eshell-hist-ignoredups t)
- '(eshell-input-filter (quote eshell-input-filter-initial-space))
+ '(eshell-input-filter 'eshell-input-filter-initial-space)
+ '(fci-rule-color "#5B6268")
  '(flycheck-mode-line-prefix "flyc")
+ '(global-auto-revert-non-file-buffers nil)
+ '(gnus-thread-sort-functions
+   '(gnus-thread-sort-by-number gnus-thread-sort-by-subject gnus-thread-sort-by-date))
  '(ibuffer-formats
-   (quote
-    ((mark modified read-only locked " "
-           (name 18 18 :left :elide)
+   '((mark modified read-only locked " "
+           (name 72 72 :left :elide)
            " "
            (size-h 9 -1 :right)
            " "
@@ -53,10 +69,9 @@
            " " filename-and-process)
      (mark " "
            (name 16 -1)
-           " " filename))))
+           " " filename)))
  '(ibuffer-saved-filter-groups
-   (quote
-    (("default"
+   '(("default"
       ("dired"
        (mode . dired-mode))
       ("org"
@@ -98,65 +113,102 @@
        (or
         (name . "^\\*scratch\\*$")
         (name . "^\\*Messages\\*$")))
+      ("exwm"
+       (mode . exwm-mode))
       ("erc"
-       (mode . erc-mode))))))
- '(ls-lisp-dirs-first t t)
- '(magit-display-buffer-function (quote magit-display-buffer-fullframe-status-v1))
+       (mode . erc-mode)))))
+ '(inhibit-startup-buffer-menu t)
+ '(inhibit-startup-echo-area-message "bandali")
+ '(inhibit-startup-screen t)
+ '(initial-buffer-choice t)
+ '(initial-scratch-message nil)
+ '(isearch-allow-scroll t)
+ '(jdee-db-active-breakpoint-face-colors (cons "#1B2229" "#51afef"))
+ '(jdee-db-requested-breakpoint-face-colors (cons "#1B2229" "#98be65"))
+ '(jdee-db-spec-breakpoint-face-colors (cons "#1B2229" "#3f444a"))
+ '(ls-lisp-dirs-first t)
+ '(magit-diff-refine-hunk t)
+ '(magit-display-buffer-function 'magit-display-buffer-fullframe-status-v1)
+ '(message-elide-ellipsis "[...]
+")
+ '(minions-mode t)
+ '(mm-uu-diff-groups-regexp
+   "\\(gmane\\|gnu\\|l\\)\\..*\\(diff\\|commit\\|cvs\\|bug\\|dev\\)")
  '(mml-secure-key-preferences
-   (quote
-    ((OpenPGP
+   '((OpenPGP
       (sign)
       (encrypt
        ("ineiev@gnu.org" "BD9D4DEE7B2FF1CBEF2EE0C4E0ACD3E0CBE7874A")))
      (CMS
       (sign)
-      (encrypt)))))
+      (encrypt))))
  '(mml-secure-openpgp-encrypt-to-self t)
  '(mml-secure-openpgp-sign-with-sender t)
+ '(objed-cursor-color "#ff6c6b")
+ '(oddmuse-username "bandali" t)
  '(org-agenda-files
-   (quote
-    ("~/usr/org/todos/personal.org" "~/usr/org/todos/habits.org" "~/src/git/masters-thesis/todo.org")))
+   '("~/usr/org/todos/personal.org" "~/usr/org/todos/habits.org" "~/src/git/masters-thesis/todo.org"))
  '(org-agenda-start-on-weekday 0)
  '(org-agenda-time-leading-zero t)
  '(org-habit-graph-column 44)
- '(org-latex-packages-alist (quote (("" "listings") ("" "color"))))
+ '(org-latex-packages-alist '(("" "listings") ("" "color")))
  '(org-pretty-entities t)
- '(page-break-lines-max-width 70 t)
- '(projectile-completion-system (quote ivy))
+ '(page-break-lines-max-width 70)
+ '(pdf-view-midnight-colors (cons "#bbc2cf" "#282c34"))
+ '(pdf-view-resize-factor 1.05)
+ '(projectile-completion-system 'ivy)
  '(projectile-mode-line-prefix " proj")
  '(recentf-max-saved-items 2000)
  '(recentf-save-file "/home/bandali/.emacs.d/var/recentf-save.el")
+ '(require-final-newline t)
  '(safe-local-variable-values
-   (quote
-    ((tex-main-file . "../thesis.tex")
+   '((tex-main-file . "../thesis.tex")
      (org-export-allow-bind-keywords . t)
      (eval load-file "thesis.el")
      (eval modify-syntax-entry 43 "'")
      (eval modify-syntax-entry 36 "'")
      (eval modify-syntax-entry 126 "'")
-     (eval require
-           (quote org-ref))
+     (eval require 'org-ref)
      (eval when
-           (featurep
-            (quote typo)
-            (typo-mode -1)))
-     (eval add-hook
-           (quote after-save-hook)
-           (function a/async-babel-tangle)
-           (quote append)
-           (quote local))
-     (eval add-hook
-           (quote after-save-hook)
-           (quote org-beamer-export-to-latex)
-           t t)
+           (featurep 'typo
+                     (typo-mode -1)))
+     (eval add-hook 'after-save-hook #'a/async-babel-tangle 'append 'local)
+     (eval add-hook 'after-save-hook 'org-beamer-export-to-latex t t)
      (eval setq org-latex-prefer-user-labels t)
-     (eval add-hook
-           (quote after-save-hook)
-           (quote org-latex-export-to-latex)
-           t t))))
- '(save-place-file "/home/bandali/.emacs.d/var/save-place.el")
- '(savehist-file "/home/bandali/.emacs.d/var/savehist.el" t)
- '(unkillable-buffers (quote ("^\\*scratch\\*$" "^\\*Messages\\*$")))
+     (eval add-hook 'after-save-hook 'org-latex-export-to-latex t t)))
+ '(save-interprogram-paste-before-kill t)
+ '(save-place-file "/home/bandali/.emacs.d/var/save-place.el" t)
+ '(savehist-file "/home/bandali/.emacs.d/var/savehist.el")
+ '(search-default-mode 'char-fold-to-regexp)
+ '(split-width-threshold 150)
+ '(text-scale-mode-step 1.05)
+ '(unkillable-buffers '("^\\*scratch\\*$" "^\\*Messages\\*$"))
+ '(vc-annotate-background "#282c34")
+ '(vc-annotate-color-map
+   (list
+    (cons 20 "#98be65")
+    (cons 40 "#b4be6c")
+    (cons 60 "#d0be73")
+    (cons 80 "#ECBE7B")
+    (cons 100 "#e6ab6a")
+    (cons 120 "#e09859")
+    (cons 140 "#da8548")
+    (cons 160 "#d38079")
+    (cons 180 "#cc7cab")
+    (cons 200 "#c678dd")
+    (cons 220 "#d974b7")
+    (cons 240 "#ec7091")
+    (cons 260 "#ff6c6b")
+    (cons 280 "#cf6162")
+    (cons 300 "#9f585a")
+    (cons 320 "#6f4e52")
+    (cons 340 "#5B6268")
+    (cons 360 "#5B6268")))
+ '(vc-annotate-very-old-color nil)
+ '(vc-git-print-log-follow t)
+ '(version-control t)
+ '(view-read-only t)
+ '(web-mode-enable-auto-indentation nil t)
  '(which-key-add-column-padding 5)
  '(which-key-max-description-length 32))
 (custom-set-faces
@@ -165,6 +217,11 @@
  ;; 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))))
+ '(ivy-current-match ((((class color) (background light)) :background "#d7d7d7" :foreground "black") (((class color) (background dark)) :background "#65a7e2" :foreground "black")))
+ '(ivy-minibuffer-match-face-1 ((t (:background "#eeeeee"))))
+ '(ivy-minibuffer-match-face-2 ((t (:background "#e7e7e7" :weight bold))))
+ '(ivy-minibuffer-match-face-3 ((t (:background "light goldenrod" :weight semi-bold))))
+ '(ivy-minibuffer-match-face-4 ((t (:background "misty rose" :weight semi-bold))))
  '(ivy-virtual ((t (:inherit font-lock-builtin-face :foreground "dim gray"))))
  '(magit-diff-file-heading ((t (:weight normal))))
  '(quote (org-block-begin-line ((t (:foreground "#5a5b5a" :background "#1d1f21")))))