Fix some byte-compiler warnings and remove some version workarounds

[~bandali/configs] / etc / custom.el

diff --git a/etc/custom.el b/etc/custom.el
index 3868db1..a831542 100644 (file)
--- a/etc/custom.el
+++ b/etc/custom.el
@@ -3,15 +3,65 @@
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.

- '(company-dabbrev-char-regexp "\\sw\\|\\s_\\|[-_]")
- '(company-dabbrev-downcase nil)
- '(company-dabbrev-ignore-case nil)
- '(company-idle-delay 0.3)
+ '(abbrev-file-name "/home/bandali/.emacs.d/var/abbrev.el")
+ '(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)
  '(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
+   '(article
+     (vertical 1.0
+               (summary 0.25 point)
+               (horizontal 1.0
+                           (article 1.0)
+                           (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 'loopback)
+ '(erc-fill-column 77)
+ '(erc-fill-function 'erc-fill-static)
+ '(erc-fill-static-center 18)
+ '(erc-join-buffer 'bury)
+ '(erc-lurker-hide-list '("JOIN" "PART" "QUIT"))
+ '(erc-nick "bandali")
+ '(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
+   '("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 '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
    '((mark modified read-only locked " "
  '(ibuffer-formats
    '((mark modified read-only locked " "

-           (name 18 18 :left :elide)
+           (name 72 72 :left :elide)

            " "
            (size-h 9 -1 :right)
            " "
            " "
            (size-h 9 -1 :right)
            " "


@@ -25,7 +75,13 @@
       ("dired"
        (mode . dired-mode))
       ("org"
       ("dired"
        (mode . dired-mode))
       ("org"

-       (name . "^.*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)


@@ -35,40 +91,138 @@
       ("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 . java-mode)
+        (mode . emacs-lisp-mode)
+        (mode . scheme-mode)
+        (mode . haskell-mode)
+        (mode . lean-mode)
+        (mode . go-mode)
+        (mode . alloy-mode)))
+      ("tex"
+       (or
+        (mode . bibtex-mode)
+        (mode . latex-mode)))

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

-        (name . "^\\*Messages\\*$"))))))
+        (name . "^\\*Messages\\*$")))
+      ("exwm"
+       (mode . exwm-mode))
+      ("erc"
+       (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
+   '((OpenPGP
+      (sign)
+      (encrypt
+       ("ineiev@gnu.org" "BD9D4DEE7B2FF1CBEF2EE0C4E0ACD3E0CBE7874A")))
+     (CMS
+      (sign)
+      (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
+   '("~/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 '(("" "listings") ("" "color")))
  '(org-latex-packages-alist '(("" "listings") ("" "color")))

+ '(org-pretty-entities t)
+ '(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
  '(safe-local-variable-values

-   '((eval setq org-latex-prefer-user-labels t)
-     (eval add-hook 'after-save-hook 'org-latex-export-to-latex t t)
-     (org-hugo-footer . "
-
-[//]: # \"Exported with love from a post written in Org mode\"
-[//]: # \"- https://ox-hugo.scripter.co\"")
-     (eval add-hook 'after-save-hook #'amin/async-babel-tangle 'append 'local))))
+   '((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 'org-ref)
+     (eval when
+           (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 '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
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; 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))))
 (custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; 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 "#111111" :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))))
+ '(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))))
  '(magit-diff-file-heading ((t (:weight normal))))

- '(message-header-subject ((t (:foreground "navy blue" :weight semi-bold))))
- '(message-header-to ((t (:foreground "MidnightBlue" :weight semi-bold))))
- '(notmuch-search-unread-face ((t (:weight semi-bold))))
- '(notmuch-tag-face ((t (:foreground "navy blue" :weight semi-bold))))
+ '(quote (org-block-begin-line ((t (:foreground "#5a5b5a" :background "#1d1f21")))))

  '(widget-button ((t (:weight semi-bold)))))
  '(widget-button ((t (:weight semi-bold)))))