emacs: update custom, fix haskell-cafe directory name

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

(custom-set-variables
 ;; custom-set-variables 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.
 '(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)
 '(company-minimum-prefix-length 1)
 '(company-selection-wrap-around t)
 '(ebdb-gnus-window-configuration
   (quote
    (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) t)
 '(ediff-window-setup-function (quote ediff-setup-windows-plain) t)
 '(epa-pinentry-mode (quote loopback))
 '(epg-gpg-program "/home/bandali/.guix-profile/bin/gpg")
 '(epg-pinentry-mode (quote loopback) t)
 '(erc-fill-function (quote erc-fill-static))
 '(erc-fill-static-center 18)
 '(erc-join-buffer (quote bury) t)
 '(erc-lurker-hide-list (quote ("JOIN" "PART" "QUIT")) t)
 '(erc-nick "bandali" t)
 '(erc-pcomplete-nick-postfix ",")
 '(erc-rename-buffers t t)
 '(erc-server-reconnect-attempts 5 t)
 '(erc-server-reconnect-timeout 3 t)
 '(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))
 '(erc-track-shorten-function nil)
 '(eshell-directory-name "/home/bandali/.emacs.d/var/eshell/")
 '(eshell-hist-ignoredups t t)
 '(eshell-input-filter (quote eshell-input-filter-initial-space) t)
 '(flycheck-mode-line-prefix "flyc")
 '(ibuffer-formats
   (quote
    ((mark modified read-only locked " "
           (name 18 18 :left :elide)
           " "
           (size-h 9 -1 :right)
           " "
           (mode 16 16 :left :elide)
           " " filename-and-process)
     (mark " "
           (name 16 -1)
           " " filename))))
 '(ibuffer-saved-filter-groups
   (quote
    (("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)
        (mode . css-mode)
        (mode . scss-mode)
        (mode . js2-mode)))
      ("shell"
       (or
        (mode . eshell-mode)
        (mode . shell-mode)
        (mode . term-mode)))
      ("programming"
       (or
        (mode . python-mode)
        (mode . c-mode)
        (mode . c++-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\\*$")
        (name . "^\\*Messages\\*$")))
      ("erc"
       (mode . erc-mode))))))
 '(ls-lisp-dirs-first t t)
 '(magit-display-buffer-function (quote magit-display-buffer-fullframe-status-v1))
 '(mml-secure-key-preferences
   (quote
    ((OpenPGP
      (sign)
      (encrypt
       ("ineiev@gnu.org" "BD9D4DEE7B2FF1CBEF2EE0C4E0ACD3E0CBE7874A")))
     (CMS
      (sign)
      (encrypt)))))
 '(mml-secure-openpgp-encrypt-to-self t)
 '(mml-secure-openpgp-sign-with-sender t)
 '(org-agenda-files
   (quote
    ("~/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-pretty-entities t)
 '(page-break-lines-max-width 70 t)
 '(projectile-completion-system (quote ivy))
 '(projectile-mode-line-prefix " proj")
 '(recentf-max-saved-items 2000)
 '(recentf-save-file "/home/bandali/.emacs.d/var/recentf-save.el")
 '(safe-local-variable-values
   (quote
    ((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 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)
     (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" t)
 '(savehist-file "/home/bandali/.emacs.d/var/savehist.el" t)
 '(unkillable-buffers (quote ("^\\*scratch\\*$" "^\\*Messages\\*$")))
 '(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))))
 '(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")))))
 '(widget-button ((t (:weight semi-bold)))))