willemml/dotfiles.nix
1
0
Fork 0
mirror of https://github.com/willemml/dotfiles.nix.git synced 2025-04-12 19:27:17 +00:00
Code Issues Projects Releases Packages Wiki Activity

port emacs config to nix

Browse source
This commit is contained in:
willemml 2022-12-29 15:08:51 -08:00
parent f4d02eadaa
commit aef6abacd9
Signed by: willemml
GPG key ID: C3DE5DF6198DACBD
3 changed files with 458 additions and 24 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

475
emacs.nix
View file

@ -2,10 +2,9 @@
let pcfg = config.programs.emacs.init.usePackage;
in {
imports = [
nurNoPkgs.repos.rycee.hmModules.emacs-init
nurNoPkgs.repos.rycee.hmModules.emacs-notmuch
];
imports = [ nurNoPkgs.repos.rycee.hmModules.emacs-init ];
programs.emacs.enable = true;
programs.emacs.init = {
enable = true;
@ -40,21 +39,23 @@ in {
(setq inhibit-startup-screen t
inhibit-startup-echo-area-message (user-login-name))
(setq package-archives '(("melpa" . "https://melpa.org/packages/")
("melpa-stable" . "https://stable.melpa.org/packages/")
("gnu" . "https://elpa.gnu.org/packages/")
("nongnu" . "https://elpa.nongnu.org/nongnu/")))
;; Empty initial scratch buffer.
(setq initial-major-mode 'fundamental-mode
initial-scratch-message nil)
;; Accept 'y' and 'n' rather than 'yes' and 'no'.
(defalias 'yes-or-no-p 'y-or-n-p)
;; Don't use tabs for indents
(setq indent-tabs-mode nil)
;; Don't warn when cannot guess python indent level
(setq python-indent-guess-indent-offset-verbose nil)
;; Set indent level to 4
(setq-default tab-width 4)
;; Typically, I only want spaces when pressing the TAB key. I also
;; want 4 of them.
(setq-default indent-tabs-mode nil
tab-width 4
c-basic-offset 4)
;; Increase emacs data read limit (default too low for LSP)
(setq read-process-output-max (* 1024 1024))
@ -80,18 +81,52 @@ in {
;; Enable highlighting of current line.
(global-hl-line-mode 1)
(setq custom-file (locate-user-emacs-file "custom.el"))
(load custom-file)
;; When finding file in non-existing directory, offer to create the
;; parent directory.
(defun with-buffer-name-prompt-and-make-subdirs ()
(let ((parent-directory (file-name-directory buffer-file-name)))
(when (and (not (file-exists-p parent-directory))
(y-or-n-p (format "Directory `%s' does not exist! Create it? " parent-directory)))
(y-or-n-p (format "Directory `%s' does not exist! Create it? " parent-directory)))
(make-directory parent-directory t))))
(add-to-list 'find-file-not-found-functions #'with-buffer-name-prompt-and-make-subdirs)
;; Bind Emacs built in completion using completion-at-point to "C-M-i"
(global-set-key (kbd "C-M-i") 'completion-at-point)
;; Keybind to format/prettify document, uses either format-all or
;; lsp-mode depending on availability
(global-set-key (kbd "C-c C-y") 'my/format-document)
;; Don't warn when cannot guess python indent level
(setq-default python-indent-guess-indent-offset-verbose nil)
(defun my/define-multiple-keys (map keys)
"Define multiple KEYS in a keymap.
Argument MAP keymap in which to bind the keys."
(dolist (key keys nil)
(define-key map (kbd (car key)) (nth 1 key))))
(defun my/customize-set-variables (variables)
"Set multiple Customize VARIABLES at once."
(dolist (variable variables nil)
(customize-set-variable (car variable) (nth 1 variable))))
(defun my/find-file-in-folder-shortcut (folder)
"Interactively call `find-file' after using 'cd' into 'FOLDER'."
(cd (expand-file-name folder))
(call-interactively #'find-file))
(defun my/electric-mode ()
"Enable some basic features for coding."
(interactive)
(electric-pair-local-mode)
(electric-indent-local-mode))
(defun dev ()
"Shortcut to '~/dev' folder."
(interactive)
(my/find-file-in-folder-shortcut "~/dev"))
'';
usePackage = {
@ -101,6 +136,412 @@ in {
(load-theme 'dracula t)
'';
};
yasnippet = {
enable = true;
config = ''
(yas-global-mode 1)
'';
};
yasnippet-snippets = {
enable = true;
config = ''
(yas-reload-all)
'';
};
ivy = {
enable = true;
command = [ "ivy-mode" ];
extraConfig = ''
:custom
(ivy-use-virtual-buffers t)
(enable-recursive-minibuffers t)
'';
bind = { "C-c C-r" = "ivy-resume"; };
hook = [ "(after-init . ivy-mode)" ];
};
swiper = {
enable = true;
bind = { "C-s" = "swiper"; };
};
counsel = {
enable = true;
bind = {
"M-x" = "counsel-M-x";
"C-x C-f" = "counsel-find-file";
"<f1> f" = "counsel-describe-function";
"<f1> v" = "counsel-describe-variable";
"<f1> o" = "counsel-describe-symbol";
"<f1> l" = "counsel-find-library";
"<f2> i" = "counsel-info-lookup-symbol";
"<f2> u" = "counsel-unicode-char";
"C-c g" = "counsel-git";
"C-c j" = "counsel-git-grep";
"C-c k" = "counsel-ag";
"C-x l" = "counsel-locate";
"C-S-o" = "counsel-rhythmbox";
};
bindLocal = {
minibuffer-local-map = { "C-r" = "counsel-minibuffer-history"; };
};
};
company = {
enable = true;
defines = [ "comapny-text-icons-margin" ];
init = ''
;; Align company-mode tooltips to the right hand side
(setq company-tooltip-align-annotations t)
;; Display number of completions before and after current suggestions
;; in company-mode
(setq company-tooltip-offset-display 'lines)
;; Display text icon of type in company popup
(setq company-format-margin-function #'company-text-icons-margin)
'';
hook =
[ "(sh-mode . company-mode)" "(emacs-lisp-mode . company-mode)" ];
};
rust-mode = {
enable = true;
bindLocal.rust-mode-map = {
"C-c C-y" = "lsp-format-buffer";
"C-c C-c" = "rust-run-clippy";
"C-c C-r" = "rust-run";
"C-c C-t" = "rust-test";
"C-c C-o" = "rust-compile";
};
};
format-all = {
enable = true;
command = [ "format-all-buffer" ];
bindLocal.c-mode-map = { "C-c C-y" = "format-all-buffer"; };
};
tree-sitter = {
enable = true;
init = ''
(setq tree-sitter-major-mode-language-alist '((arduino-mode . c)))
'';
hook = [
"(rust-mode . tree-sitter-hl-mode)"
"(python-mode . tree-sitter-hl-mode)"
"(c-mode . tree-sitter-hl-mode)"
"(shell-mode . tree-sitter-hl-mode)"
"(javascript-mode . tree-sitter-hl-mode)"
];
};
tree-sitter-langs.enable = true;
lsp-mode = {
enable = true;
after = [ "format-all" ];
command = [ "lsp-format-buffer" ];
extraConfig = ''
:preface
(defun my/format-document ()
"Formats the buffer using 'lsp-format-buffer'.
Falls back to 'format-all-buffer' if LSP does not support formatting."
(interactive)
(cond ((fboundp 'lsp-feature?)
(cond ((lsp-feature? "textDocument/formatting")
(lsp-format-buffer))
((lsp-feature? "textDocument/rangeFormatting")
(lsp-format-buffer))
(t (format-all-buffer))))
(t (format-all-ensure-formatter)
(format-all-buffer))))
'';
functions = [ "lsp-deferred" "lsp-feature" "lsp-register-client" ];
init = ''
(setq lsp-log-io nil)
(setq lsp-keymap-prefix "C-c l")
'';
config = ''
(lsp-treemacs-sync-mode 1)
(add-to-list 'lsp-language-id-configuration '(nix-mode . "nix"))
(lsp-register-client
(make-lsp-client :new-connection (lsp-stdio-connection '("rnix-lsp"))
:major-modes '(nix-mode)
:server-id 'nix))
'';
hook = [
"(lsp-mode . company-mode)"
"(rust-mode . lsp)"
"(c-mode . lsp)"
"(javascript-mode . lsp)"
];
bind = { "C-c C-y" = "my/format-document"; };
};
lsp-ui = {
enable = true;
command = [ "lsp-ui-mode" ];
};
lsp-ivy = {
enable = true;
command = [ "lsp-ivy-workspace-symbol" ];
};
lsp-treemacs = {
enable = true;
command = [ "lsp-treemacs-errors-lisp" ];
};
lsp-java = {
enable = true;
init = ''
(setq lsp-java-format-settings-url
"https://raw.githubusercontent.com/google/styleguide/gh-pages/eclipse-java-google-style.xml")
(setq lsp-java-format-settings-profile
"GoogleStyle")
(setq lsp-java-jdt-download-url
"https://download.eclipse.org/jdtls/milestones/1.16.0/jdt-language-server-1.16.0-202209291445.tar.gz")
'';
hook = [ "(java-mode . lsp)" ];
};
flycheck = {
enable = true;
hook = [ "(after-init . global-flycheck-mode)" ];
};
arduino-mode = {
enable = true;
config = ''
(require 'flycheck-arduino)
(add-hook 'arduino-mode-hook #'flycheck-arduino-setup)
'';
init = ''
(setq arduino-executable "/Applications/Arduino.app/Contents/MacOS/Arduino")
'';
};
nix-mode = {
enable = true;
extraConfig = ''
:mode "\\.nix\\'"
'';
bindLocal.nix-mode-map = { "C-c C-y" = "nix-format-buffer"; };
extraPackages = [ pkgs.nixfmt ];
};
edit-indirect = {
enable = true;
bind = { "C-c '" = "edit-indirect-region"; };
};
org = {
enable = true;
extraConfig = ''
:preface
(defun my/indent-org-block-automatically ()
"Indent the current org code block."
(interactive)
(when (org-in-src-block-p)
(org-edit-special)
(indent-region (point-min) (point-max))
(org-edit-src-exit)))
(defun my/org-force-open-current-window ()
"Open a link using 'org-open-at-point' in current window."
(interactive)
(let ((org-link-frame-setup
(quote
((vm . vm-visit-folder)
(vm-imap . vm-visit-imap-folder)
(gnus. gnus)
(file . find-file)
(wl . wl)))
))
(org-open-at-point)))
(defun my/follow-org-link (arg)
"Follow a link in orgmode If ARG is given.
Opens in new window otherwise opens in current window."
(interactive "P")
(if arg
(org-open-at-point)
(my/org-force-open-current-window)))
'';
init = ''
(setq org-src-window-setup 'current-window)
(setq org-confirm-babel-evaluate nil)
(setq org-src-fontify-natively t)
(setq org-src-tab-acts-natively t)
(setq org-src-preserve-indentation t)
(setq org-export-with-tags nil)
(setq org-publish-project-alist
'(("Root"
:base-directory "~/Documents/org-roam/"
:publishing-function org-html-publish-to-html
:publishing-directory "~/public_html"
:section-numbers nil
:with-author nil
:with-creator t
:with-toc t
:time-stamp-file nil)))
;; Configure HTML export
(setq org-html-validation-link nil)
(setq org-html-head-include-scripts nil)
(setq org-html-head-include-default-style nil)
(setq org-html-head "<link rel=\"stylesheet\" href=\"https://cdn.simplecss.org/simple.min.css\" />")
(setq org-html-section)
'';
hook = [
"(org-mode . auto-fill-mode)"
"(org-babel-after-execute . org-redisplay-inline-images)"
];
bind = {
"C-c n c" = "org-id-get-create";
"C-c n a" = "org-agenda";
};
bindLocal.org-mode-map = {
"C-c C-o" = "my/follow-org-link";
"C-c C-y" = "my/indent-org-block-automatically";
"<mouse-1>" = "my/follow-org-link";
};
};
htmlize.enable = true;
emacsql-sqlite.enable = true;
org-contrib.enable = true;
org-roam = {
enable = true;
extraConfig = ''
:preface
(defun my/org-roam-node-insert-immediate (arg &rest args)
"Insert a link to a new node ARG with ARGS without capturing anything."
(interactive "P")
(let ((args (cons arg args))
(org-roam-capture-templates (list (append (car org-roam-capture-templates)
'(:immediate-finish t)))))
(apply #'org-roam-node-insert args)))
(defun my/org-roam-filter-by-tag (tag-name)
"Filter org notes by tag TAG-NAME."
(lambda (node)
(member tag-name (org-roam-node-tags node))))
(defun my/org-roam-list-notes-by-tag (tag-name)
"List all org notes with the tag TAG-NAME."
(mapcar #'org-roam-node-file
(seq-filter
(my/org-roam-filter-by-tag tag-name)
(org-roam-node-list))))
(defun my/refresh-agenda-list ()
"Refresh the list of files to search for agenda entries."
(interactive)
(setq org-agenda-files
(delete-dups
(my/org-roam-list-notes-by-tag "todo"))))
'';
bind = {
"C-c n l" = "org-roam-buffer-toggle";
"C-c n f" = "org-roam-node-find";
"C-c n d" = "org-roam-dailies-map";
};
bindLocal.org-mode-map = {
"C-c n t" = "org-roam-tag-add";
"C-c n n" = "org-roam-alias-add";
"C-c n i" = "org-roam-node-insert";
"C-c n I" = "my/org-roam-node-insert-immediate";
};
command = [ "org-roam-db-sync" ];
defines = [ "org-roam-v2-ack" ];
init = ''
(setq org-roam-directory (file-truename "~/Documents/org-roam"))
(setq org-roam-db-location (expand-file-name "org-roam.db" org-roam-directory))
(setq org-roam-v2-ack t)
(setq org-roam-completion-everywhere t)
(setq org-roam-capture-templates '(("d" "default" plain "%?" :target (file+head "%<%Y%m%d%H%M%S>-''${slug}.org" "#+title: ''${title}\n") :unnarrowed t)))
'';
hook = [ "(emacs-startup . org-roam-db-sync)" ];
config = ''
(org-roam-db-autosync-mode)
;; Build the agenda list the first time for the session
(my/refresh-agenda-list)
'';
};
org-roam-ui = {
enable = true;
after = [ "org-roam" ];
};
plantuml-mode = {
enable = true;
init = ''
(setq plantuml-executable-path "${pkgs.plantuml}/bin/plantuml")
(setq plantuml-default-exec-mode 'executable)
'';
extraPackages = [ pkgs.plantuml ];
};
graphviz-dot-mode = {
enable = true;
bindLocal.graphviz-dot-mode-map = {
"C-c C-y" = "graphviz-dot-indent-graph";
};
extraPackages = [ pkgs.graphviz ];
};
ob-dot = {
enable = true;
after = [ "org" ];
};
ob-shell = {
enable = true;
after = [ "org" ];
};
ob-calc = {
enable = true;
after = [ "org" ];
};
ob-emacs-lisp = {
enable = true;
after = [ "org" ];
};
ob-python = {
enable = true;
extraPackages = [
(pkgs.python310.withPackages (p: with p; [ matplotlib latexify-py ]))
];
after = [ "org" ];
config = ''
(setq org-babel-python-command "${pkgs.python310}/bin/python3.10")
(setq-default python-indent-guess-indent-offset-verbose nil)
(defun my/org-babel-execute:python-session (body params)
(let ((session-name (cdr (assq :session params))))
(when (not (eq session-name "none"))
(org-babel-python-initiate-session session-name))))
(advice-add #'org-babel-execute:python :before #'my/org-babel-execute:python-session)
'';
};
};
};
}

4
packages.nix
View file

@ -13,10 +13,7 @@ in {
++ [ docker docker-compose ] ++ [
black
shellcheck
plantuml
clang-tools
graphviz
nixfmt
texlive.combined.scheme-full
] ++ [ nodePackages.bash-language-server ] ++ [
zsh-powerlevel10k
@ -41,6 +38,5 @@ in {
rsync
openssh
tldr
(import ./python-packages.nix { inherit pkgs; })
];
}

3
python-packages.nix
View file

@ -1,3 +0,0 @@
{ pkgs }:
pkgs.python310.withPackages (p: with p; [ matplotlib latexify-py ])