(let ((indent 2))
  (setq standard-indent indent)
   (setq-default indent-tabs-mode nil)
   (setq-default tab-width 2)
   (setq c-basic-offset indent))
(load (expand-file-name "~/.quicklisp/slime-helper.el"))
(setq inferior-lisp-program "sbcl")
(defun font-size-to-height (size) (* 10 size))
(let ((font-size 14))
  (set-face-attribute 'default nil :height (font-size-to-height font-size)))
(setq mastodon-instance-url "https://shonk.phite.ro"
      mastodon-active-user "graphite")
(evil-mode 1)
(add-hook 'lisp-mode 'parinfer-rust-mode)
(require 'bshell)
(add-hook 'eshell-load-hook #'eat-eshell-mode)
(add-hook 'eshell-load-hook #'eat-eshell-visual-command-mode)
; (load (expand-file-name "~/.emacs.d/everblush-theme.el"))
(load-theme 'uwu)
(if (window-system)
    (set-frame-size (selected-frame) 80 20))
;; (add-hook 'c++-mode-hook 'irony-mode)
;; (add-hook 'c-mode-hook 'irony-mode)
;; (add-hook 'irony-mode-hook 'irony-cdb-autosetup-compile-options)
(add-hook 'emacs-lisp-mode-hook 'parinfer-rust-mode)

;(push 'hotfuzz completion-styles)

(setq vertico-cycle nil)
(setq vertico-resize t)
;; (bind-key "C-j" vertico-next-group)
;; (global-set-key (kbd "C-k") vertico-previous-group)
;; (global-set-key (kbd "<tab>") vertico-insert)
(vertico-mode)

(savehist-mode)

(marginalia-mode 1)


;; (global-set-key (kbd "M-s M-g") consult-grep)
;; (global-set-key (kbd "M-s M-f") consult-find)
;; (global-set-key (kbd "M-s M-o") consult-outline)
;; (global-set-key (kbd "M-s M-l") consult-line)
;; (global-set-key (kbd "M-s M-b") consult-buffer)
;; (global-set-key (kbd "M-s M-m") consult-man)


(setq corfu-cycle t)
(setq corfu-auto t)
;(corfu-separator ?\s)
(global-corfu-mode)