flocon/emacs/.emacs.d/README.org

185 lines
5.2 KiB
Org Mode

#+begin_src emacs-lisp
(setq user-full-name "Anthony Rodriguez")
(setq inhibit-startup-message t)
(scroll-bar-mode -1) ; Disable visible scrollbar
(tool-bar-mode -1) ; Disable the toolbar
(tooltip-mode -1) ; Disable tooltips
(set-fringe-mode 10) ; Give some breathing room
(menu-bar-mode -1) ; Disable the menu bar
;disable backup
(setq backup-inhibited t)
;disable auto save
(setq auto-save-default nil)
(add-to-list 'default-frame-alist '(font . "Monospace 15"))
(add-hook 'text-mode-hook 'visual-line-mode)
;; initialize straight.el
(defvar bootstrap-version)
(let ((bootstrap-file
(expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
(bootstrap-version 6))
(unless (file-exists-p bootstrap-file)
(with-current-buffer
(url-retrieve-synchronously
"https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el"
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage))
;; initialize use-package
(straight-use-package 'use-package)
(setq use-package-always-ensure t)
(use-package straight
:custom
(straight-use-package-by-default t))
;; set theme
(use-package catppuccin-theme
:custom
(catppuccin-flavor 'mocha)
:init
(load-theme 'catppuccin t)
(catppuccin-reload))
;; ensures environment variables are available in GUI and daemon
(use-package exec-path-from-shell
:config
(dolist (var '("SSH_AUTH_SOCK" "SSH_AGENT_PID" "GPG_AGENT_INFO" "LANG" "LC_CTYPE" "NIX_SSL_CERT_FILE" "NIX_PATH"))
(add-to-list 'exec-path-from-shell-variables var)))
(when (memq window-system '(mac ns x))
(exec-path-from-shell-initialize))
(when (daemonp)
(exec-path-from-shell-initialize))
(use-package vertico
:init
(vertico-mode))
(use-package nerd-icons)
(use-package doom-modeline
:ensure t
:init (doom-modeline-mode 1)
:custom ((doom-modeline-height 15)))
(use-package which-key
:config
(which-key-mode))
;; magit
(use-package magit)
;; org setup
;; export to a4
(with-eval-after-load 'ox-latex (add-to-list 'org-latex-classes
'("article" "\\documentclass[11pt,a4paper]{article}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))))
(use-package org-roam
:custom
(org-roam-directory "~/org/notes")
(org-roam-completion-everywhere t)
:config
(org-roam-setup)
:bind (("C-c n f" . org-roam-node-find)
(:map org-mode-map
(("C-c n i" . org-roam-node-insert)
("C-c n l" . org-roam-buffer-toggle)))))
(setq org-publish-project-alist
(list
'("notes"
:base-directory "~/org/notes"
:base-extension "org"
:publishing-directory "~/org/notes"
:publishing-function org-latex-publish-to-pdf
)))
;; spell checking for text modes
(dolist (hook '(text-mode-hook))
(add-hook hook (lambda () (flyspell-mode 1))))
(dolist (hook '(change-log-mode-hook log-edit-mode-hook))
(add-hook hook (lambda () (flyspell-mode -1))))
(add-hook 'prog-mode-hook
(lambda ()
(flyspell-prog-mode)))
;; avoid spell checking code regions in org mode
(add-to-list 'ispell-skip-region-alist '("^#+BEGIN_SRC" . "^#+END_SRC"))
;; add different dictionaries
(let ((langs '("american" "francais")))
(setq lang-ring (make-ring (length langs)))
(dolist (elem langs) (ring-insert lang-ring elem)))
;; cycle through languages
(defun cycle-ispell-languages ()
(interactive)
(let ((lang (ring-ref lang-ring -1)))
(ring-insert lang-ring lang)
(ispell-change-dictionary lang)))
(setq ispell-program-name "aspell")
(global-set-key [f6] 'cycle-ispell-languages)
;; automatic language detection
(use-package guess-language
:config
(setq guess-language-languages '(en fr))
(setq guess-language-min-paragraph-length 35)
:hook
(text-mode . guess-language-mode))
(use-package expand-region
:bind
("C-=" . er/expand-region))
;; enable syntax highlighting in org source blocks
(setq org-src-fontify-natively t)
;; disable latex subscript in org-mode
(setq org-export-with-sub-superscripts nil)
(use-package pdf-tools
:config
(pdf-tools-install)
(setq-default pdf-view-display-size 'fit-width))
(use-package rustic
:custom
(rustic-format-trigger 'on-save)
(rustic-analyzer-command '("rustup" "run" "stable" "rust-analyzer"))
:hook
(rustic-mode . display-line-numbers-mode))
;; lsp integration
(use-package lsp-mode
:ensure
:commands lsp
:custom
;; what to use when checking on-save. "check" is default, I prefer clippy
(lsp-rust-analyzer-cargo-watch-command "clippy")
(lsp-eldoc-render-all t)
(lsp-idle-delay 0.6))
(use-package lsp-ui
:after lsp-mode
:hook (lsp-mode . lsp-ui-mode))
;; code completion
(use-package company
:after lsp-mode)
(use-package company-box
:hook (company-mode . company-box-mode))
#+end_src