;;Look
(tool-bar-mode 0)
(scroll-bar-mode 0)
(menu-bar-mode 0)
(set-fringe-mode 0)
(blink-cursor-mode 0)
;(set-frame-parameter nil 'alpha-background 80)
;(add-to-list 'default-frame-alist '(alpha-background . 80))

(setq-default line-spacing 1)
(setq-default cursor-type  '(bar . 2))
(setq-default ring-bell-function 'ignore)

;;~ and # files
(setq make-backup-files nil)
(setq auto-save-default nil)
(setq auth-sources '("~/.authinfo"))

;;pkgs
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
(package-initialize)

(require 'use-package)

(use-package nerd-icons :ensure t)

(use-package pdf-tools
  :ensure t
  :magic ("%PDF" . pdf-view-mode)
  :config
  (pdf-tools-install :no-query))

(use-package acme-theme
  :ensure t
  :config
  (load-theme 'acme t))

;;git
(use-package magit :ensure t)
(use-package forge
  :ensure t
  :after magit)

;;org
(use-package org
  :ensure t
  :custom ((org-return-follows-link  t)))
(setq org-format-latex-options (plist-put org-format-latex-options :scale .95))
(setq org-preview-latex-default-process 'dvisvgm)

(use-package org-roam
  :ensure t
  :after org
  :init (org-roam-db-autosync-mode)
  :custom ((org-roam-v2-ack t)
           (org-roam-directory (file-truename "~/Notes")))
  :bind (("C-; n l" . org-roam-buffer-toggle)
         ("C-; n f" . org-roam-node-find)
         ("C-; n i" . org-roam-node-insert)))

(use-package org-bullets
  :ensure t
  :after org
  :hook (org-mode . org-bullets-mode))


;;devel
(use-package direnv
  :ensure t
  :bind ("C-; d" . direnv-allow))

(use-package eglot
  :ensure t
  :bind(("C-; e a" . eglot-code-actions)
	("C-; e i" . eglot-find-implementation)
	("C-; e d" . eglot-find-declaration)
	("C-; e t" . eglot-find-typeDefinition)
	("C-; e f" . eglot-format)
	("C-; e r" . eglot-rename)))

(use-package company :ensure t
  :after eglot
  :hook (eglot-managed-mode . company-mode))

(use-package ws-butler
  :ensure t
  :hook(prog-mode-hook . ws-butler-mode))

;;feel
(use-package which-key
  :ensure t
  :init (which-key-mode))

(use-package dashboard
  :ensure t
  :init (dashboard-setup-startup-hook)
  :custom ((dashboard-display-icons-p t)
           (dashboard-icon-type 'nerd-icons)
           (dashboard-center-content t)
           (dashboard-vertically-center-content t)
           (dashboard-items '((recents   . 5)
                              (bookmarks . 5)
                              (projects  . 5)))))
(setq initial-buffer-choice (lambda () (get-buffer-create dashboard-buffer-name)))

;;web search
(defun websearch ()
  (interactive)
  (xwidget-webkit-browse-url 
   (concat "https://srx.dhilton.xyz/?q=" (replace-regexp-in-string " " "+" (read-string "search:")))))

;;Custom-file
(setq custom-file (concat user-emacs-directory "custom.el"))
(load custom-file 'noerror)