;;; post-init.el --- User Init -*- lexical-binding: t; -*-
(load-theme 'modus-vivendi)

(repeat-mode 1)

(setq auth-sources '(password-store "~/.authinfo.gpg"))
(require 'auth-source-pass)
(auth-source-pass-enable)

(setopt tab-always-indent 'complete
        read-buffer-completion-ignore-case t
        read-file-name-completion-ignore-case t

        ;; This *may* need to be set to 'always just so that you don't
        ;; miss other possible good completions that match the input
        ;; string.
        completion-auto-help 'always

        ;; Include more information with completion listings
        completions-detailed t

        ;; Move focus to the completions window after hitting tab
        ;; twice.
        completion-auto-select 'second-tab

        ;; Cycle through completion options vertically, not
        ;; horizontally.
        completions-format 'vertical

        ;; Sort recently used completions first.
        completions-sort 'historical

        ;; Only show up to 10 lines in the completions window.
        completions-max-height 10

        ;; Don't show the unneeded help string at the top of the
        ;; completions buffer.
        completion-show-help nil

        ;; Add more `completion-styles' to improve candidate selection.
        completion-styles '(basic partial-completion substring initials))

(keymap-set minibuffer-local-map "C-p" #'minibuffer-previous-completion)
(keymap-set minibuffer-local-map "C-n" #'minibuffer-next-completion)

(completion-preview-mode 1)

(electric-pair-mode 1)

(setq load-prefer-newer t)

(use-package compile-angel
  :demand t
  :config
  (setq compile-angel-verbose nil)
  (push "/init.el" compile-angel-excluded-files)
  (push "/early-init.el" compile-angel-excluded-files)
  (push "/post-init.el" compile-angel-excluded-files)
  (push "/eshell.el" compile-angel-excluded-files)
  (push "/gnus.el" compile-angel-excluded-files)

  (compile-angel-on-load-mode 1))

(use-package paren
  :ensure nil
  :hook (after-init-hook . show-paren-mode)
  :custom
  (show-paren-delay 0)
  (show-paren-style 'mixed)
  (show-paren-context-when-offscreen t))

(use-package guix
  :ensure nil)

(use-package geiser-guile
  :ensure nil)

(use-package rainbow-delimiters
  :ensure nil
  :init
  (rainbow-delimiters-mode))

(use-package pinentry
  :ensure nil)

(use-package pass
  :ensure nil)

(use-package bluetooth
  :ensure nil)

(use-package enwc
  :ensure nil
  :init
  (setq enwc-default-backend 'nm))

(load-file (expand-file-name "gnus.el" user-emacs-directory))
(load-file (expand-file-name "eshell.el" user-emacs-directory))

(server-start)