diff --git a/user/.bash_profile b/user/.bash_profile index 67a73ba2a..15d129992 100644 --- a/user/.bash_profile +++ b/user/.bash_profile @@ -6,18 +6,26 @@ ## /_____/_/ \__,_/_/|_|\___/ My custom bash_profile config ## -### STARTING XSESSION +# starting xsession if [ -z "$DISPLAY" ] && [ "$(tty)" = "/dev/tty1" ] then startx -- vt1 -keeptty &>/dev/null logout fi -### ENVIRONMENT VARIABLES -export EDITOR="$HOME/.local/bin/lvim" -export XDG_DATA_HOME="${XDG_DATA_HOME:="$HOME/.local/share"}" -export XDG_CACHE_HOME="${XDG_CACHE_HOME:="$HOME/.cache"}" -export XDG_CONFIG_HOME="${XDG_CONFIG_HOME:="$HOME/.config"}" +# environment variables +export EDITOR="emacsclient -t -a ''" +export VISUAL="emacsclient -c -a 'emacs'" -### BASHRC -source "$HOME"/.bashrc # Load the bashrc +# clean home +export XDG_DATA_HOME="$HOME/.local/share" +export XDG_CACHE_HOME="$HOME/.cache" +export XDG_CONFIG_HOME="$HOME/.config" +export W3M_DIR="$XDG_DATA_HOME/w3m" +export GTK2_RC_FILES="$HOME/.config/gtk-2.0/gtkrc-2.0" +export WGETRC="$HOME/.config/wget/wgetrc" +export INPUTRC="$HOME/.config/inputrc" +export GNUPGHOME="$HOME/.local/share/gnupg" + +# bashrc +source "$HOME"/.bashrc diff --git a/user/.bashrc b/user/.bashrc index 1784ba1a0..0653638f9 100644 --- a/user/.bashrc +++ b/user/.bashrc @@ -8,7 +8,6 @@ ### EXPORT ### export TERM="xterm-256color" # getting proper colors export HISTCONTROL=ignoredups:erasedups # no duplicate entries -export EDITOR="$HOME/.local/bin/lvim" # $EDITOR use lunarvim ### "bat" as manpager export MANPAGER="sh -c 'col -bx | bat -l man -p'" diff --git a/user/.config/doom/config.el b/user/.config/doom/config.el new file mode 100644 index 000000000..c8ff9d6c5 --- /dev/null +++ b/user/.config/doom/config.el @@ -0,0 +1,567 @@ +(beacon-mode 1) + +(map! :leader + (:prefix ("b". "buffer") + :desc "List bookmarks" "L" #'list-bookmarks + :desc "Save current bookmarks to bookmark file" "w" #'bookmark-save)) + +(global-auto-revert-mode 1) +(setq global-auto-revert-non-file-buffers t) + +(evil-define-key 'normal ibuffer-mode-map + (kbd "f c") 'ibuffer-filter-by-content + (kbd "f d") 'ibuffer-filter-by-directory + (kbd "f f") 'ibuffer-filter-by-filename + (kbd "f m") 'ibuffer-filter-by-mode + (kbd "f n") 'ibuffer-filter-by-name + (kbd "f x") 'ibuffer-filter-disable + (kbd "g h") 'ibuffer-do-kill-lines + (kbd "g H") 'ibuffer-update) + +;; https://stackoverflow.com/questions/9547912/emacs-calendar-show-more-than-3-months +(defun dt/year-calendar (&optional year) + (interactive) + (require 'calendar) + (let* ( + (current-year (number-to-string (nth 5 (decode-time (current-time))))) + (month 0) + (year (if year year (string-to-number (format-time-string "%Y" (current-time)))))) + (switch-to-buffer (get-buffer-create calendar-buffer)) + (when (not (eq major-mode 'calendar-mode)) + (calendar-mode)) + (setq displayed-month month) + (setq displayed-year year) + (setq buffer-read-only nil) + (erase-buffer) + ;; horizontal rows + (dotimes (j 4) + ;; vertical columns + (dotimes (i 3) + (calendar-generate-month + (setq month (+ month 1)) + year + ;; indentation / spacing between months + (+ 5 (* 25 i)))) + (goto-char (point-max)) + (insert (make-string (- 10 (count-lines (point-min) (point-max))) ?\n)) + (widen) + (goto-char (point-max)) + (narrow-to-region (point-max) (point-max))) + (widen) + (goto-char (point-min)) + (setq buffer-read-only t))) + +(defun dt/scroll-year-calendar-forward (&optional arg event) + "Scroll the yearly calendar by year in a forward direction." + (interactive (list (prefix-numeric-value current-prefix-arg) + last-nonmenu-event)) + (unless arg (setq arg 0)) + (save-selected-window + (if (setq event (event-start event)) (select-window (posn-window event))) + (unless (zerop arg) + (let* ( + (year (+ displayed-year arg))) + (dt/year-calendar year))) + (goto-char (point-min)) + (run-hooks 'calendar-move-hook))) + +(defun dt/scroll-year-calendar-backward (&optional arg event) + "Scroll the yearly calendar by year in a backward direction." + (interactive (list (prefix-numeric-value current-prefix-arg) + last-nonmenu-event)) + (dt/scroll-year-calendar-forward (- (or arg 1)) event)) + +(map! :leader + :desc "Scroll year calendar backward" "" #'dt/scroll-year-calendar-backward + :desc "Scroll year calendar forward" "" #'dt/scroll-year-calendar-forward) + +(defalias 'year-calendar 'dt/year-calendar) + +(use-package! calfw) +(use-package! calfw-org) + +(use-package dashboard + :init ;; tweak dashboard config before loading it + (setq dashboard-set-heading-icons t) + (setq dashboard-set-file-icons t) + (setq dashboard-banner-logo-title "\nKEYBINDINGS:\ +\nFind file (SPC .) \ +Open buffer list (SPC b i)\ +\nFind recent files (SPC f r) \ +Open the eshell (SPC e s)\ +\nOpen dired file manager (SPC d d) \ +List of keybindings (SPC h b b)") + ;;(setq dashboard-startup-banner 'logo) ;; use standard emacs logo as banner + (setq initial-buffer-choice (lambda () (get-buffer "*dashboard*"))) + (setq dashboard-startup-banner "~/.config/doom/emacs-dash.txt") ;; use custom image as banner + (setq dashboard-center-content nil) ;; set to 't' for centered content + (setq dashboard-items '((recents . 5) + (agenda . 5 ) + (bookmarks . 5) + (projects . 5) + (registers . 5))) + :config + (dashboard-setup-startup-hook) + (dashboard-modify-heading-icons '((recents . "file-text") + (bookmarks . "book")))) + +(setq doom-fallback-buffer "*dashboard*") + +(map! :leader + (:prefix ("d" . "dired") + :desc "Open dired" "d" #'dired + :desc "Dired jump to current" "j" #'dired-jump) + (:after dired + (:map dired-mode-map + :desc "Peep-dired image previews" "d p" #'peep-dired + :desc "Dired view file" "d v" #'dired-view-file))) + +(evil-define-key 'normal dired-mode-map + (kbd "M-RET") 'dired-display-file + (kbd "h") 'dired-up-directory + (kbd "l") 'dired-open-file ; use dired-find-file instead of dired-open. + (kbd "m") 'dired-mark + (kbd "t") 'dired-toggle-marks + (kbd "u") 'dired-unmark + (kbd "C") 'dired-do-copy + (kbd "D") 'dired-do-delete + (kbd "J") 'dired-goto-file + (kbd "M") 'dired-do-chmod + (kbd "O") 'dired-do-chown + (kbd "P") 'dired-do-print + (kbd "R") 'dired-do-rename + (kbd "T") 'dired-do-touch + (kbd "Y") 'dired-copy-filenamecopy-filename-as-kill ; copies filename to kill ring. + (kbd "+") 'dired-create-directory + (kbd "-") 'dired-up-directory + (kbd "% l") 'dired-downcase + (kbd "% u") 'dired-upcase + (kbd "; d") 'epa-dired-do-decrypt + (kbd "; e") 'epa-dired-do-encrypt) +;; Get file icons in dired +(add-hook 'dired-mode-hook 'all-the-icons-dired-mode) +;; With dired-open plugin, you can launch external programs for certain extensions +;; For example, I set all .png files to open in 'sxiv' and all .mp4 files to open in 'mpv' +(setq dired-open-extensions '(("gif" . "sxiv") + ("jpg" . "sxiv") + ("png" . "sxiv") + ("mkv" . "mpv") + ("mp4" . "mpv"))) + +(evil-define-key 'normal peep-dired-mode-map + (kbd "j") 'peep-dired-next-file + (kbd "k") 'peep-dired-prev-file) +(add-hook 'peep-dired-hook 'evil-normalize-keymaps) + +(setq delete-by-moving-to-trash t + trash-directory "~/.local/share/Trash/files/") + +(setq doom-theme 'doom-gruvbox) +(map! :leader + :desc "Load new theme" "h t" #'counsel-load-theme) + +(use-package emojify + :hook (after-init . global-emojify-mode)) + +(map! :leader + (:prefix ("e". "evaluate/EWW") + :desc "Evaluate elisp in buffer" "b" #'eval-buffer + :desc "Evaluate defun" "d" #'eval-defun + :desc "Evaluate elisp expression" "e" #'eval-expression + :desc "Evaluate last sexpression" "l" #'eval-last-sexp + :desc "Evaluate elisp in region" "r" #'eval-region)) + +(setq browse-url-browser-function 'eww-browse-url) +(map! :leader + :desc "Search web for text between BEG/END" + "s w" #'eww-search-words + (:prefix ("e" . "evaluate/EWW") + :desc "Eww web browser" "w" #'eww + :desc "Eww reload page" "R" #'eww-reload)) + +(setq doom-font (font-spec :family "mononoki Nerd Font" :size 15) + doom-variable-pitch-font (font-spec :family "mononoki Nerd Font" :size 15) + doom-big-font (font-spec :family "mononoki Nerd Font" :size 20)) +(after! doom-themes + (setq doom-themes-enable-bold t + doom-themes-enable-italic t)) +(custom-set-faces! + '(font-lock-comment-face :slant italic) + '(font-lock-keyword-face :slant italic)) + +(setq imenu-list-focus-after-activation t) + +(map! :leader + (:prefix ("s" . "Search") + :desc "Menu to jump to places in buffer" "i" #'counsel-imenu)) + +(map! :leader + (:prefix ("t" . "Toggle") + :desc "Toggle imenu shown in a sidebar" "i" #'imenu-list-smart-toggle)) + +(defun dt/insert-todays-date (prefix) + (interactive "P") + (let ((format (cond + ((not prefix) "%A, %B %d, %Y") + ((equal prefix '(4)) "%m-%d-%Y") + ((equal prefix '(16)) "%Y-%m-%d")))) + (insert (format-time-string format)))) + +(require 'calendar) +(defun dt/insert-any-date (date) + "Insert DATE using the current locale." + (interactive (list (calendar-read-date))) + (insert (calendar-date-string date))) + +(map! :leader + (:prefix ("i d" . "Insert date") + :desc "Insert any date" "a" #'dt/insert-any-date + :desc "Insert todays date" "t" #'dt/insert-todays-date)) + +(setq ivy-posframe-display-functions-alist + '((swiper . ivy-posframe-display-at-point) + (complete-symbol . ivy-posframe-display-at-point) + (counsel-M-x . ivy-display-function-fallback) + (counsel-esh-history . ivy-posframe-display-at-window-center) + (counsel-describe-function . ivy-display-function-fallback) + (counsel-describe-variable . ivy-display-function-fallback) + (counsel-find-file . ivy-display-function-fallback) + (counsel-recentf . ivy-display-function-fallback) + (counsel-register . ivy-posframe-display-at-frame-bottom-window-center) + (dmenu . ivy-posframe-display-at-frame-top-center) + (nil . ivy-posframe-display)) + ivy-posframe-height-alist + '((swiper . 20) + (dmenu . 20) + (t . 10))) +(ivy-posframe-mode 1) ; 1 enables posframe-mode, 0 disables it. + +(map! :leader + (:prefix ("v" . "Ivy") + :desc "Ivy push view" "v p" #'ivy-push-view + :desc "Ivy switch view" "v s" #'ivy-switch-view)) + +(setq display-line-numbers-type t) +(map! :leader + :desc "Comment or uncomment lines" "TAB TAB" #'comment-line + (:prefix ("t" . "toggle") + :desc "Toggle line numbers" "l" #'doom/toggle-line-numbers + :desc "Toggle line highlight in frame" "h" #'hl-line-mode + :desc "Toggle line highlight globally" "H" #'global-hl-line-mode + :desc "Toggle truncate lines" "t" #'toggle-truncate-lines)) + +(custom-set-faces + '(markdown-header-face ((t (:inherit font-lock-function-name-face :weight bold :family "variable-pitch")))) + '(markdown-header-face-1 ((t (:inherit markdown-header-face :height 1.7)))) + '(markdown-header-face-2 ((t (:inherit markdown-header-face :height 1.6)))) + '(markdown-header-face-3 ((t (:inherit markdown-header-face :height 1.5)))) + '(markdown-header-face-4 ((t (:inherit markdown-header-face :height 1.4)))) + '(markdown-header-face-5 ((t (:inherit markdown-header-face :height 1.3)))) + '(markdown-header-face-6 ((t (:inherit markdown-header-face :height 1.2))))) + +(setq minimap-window-location 'right) +(map! :leader + (:prefix ("t" . "toggle") + :desc "Toggle minimap-mode" "m" #'minimap-mode)) + +(set-face-attribute 'mode-line nil :font "mononoki Nerd Font-13") +(setq doom-modeline-height 30 ;; sets modeline height + doom-modeline-bar-width 5 ;; sets right bar width + doom-modeline-persp-name t ;; adds perspective name to modeline + doom-modeline-persp-icon t) ;; adds folder icon next to persp name + +(xterm-mouse-mode 1) + +(after! neotree + (setq neo-smart-open t + neo-window-fixed-size nil)) +(after! doom-themes + (setq doom-neotree-enable-variable-pitch t)) +(map! :leader + :desc "Toggle neotree file viewer" "t n" #'neotree-toggle + :desc "Open directory in neotree" "d n" #'neotree-dir) + +(map! :leader + (:prefix ("=" . "open file") + :desc "Edit agenda file" "a" #'(lambda () (interactive) (find-file "~/Org/agenda.org")) + :desc "Edit doom config.org" "c" #'(lambda () (interactive) (find-file "~/.config/doom/config.org")) + :desc "Edit doom init.el" "i" #'(lambda () (interactive) (find-file "~/.config/doom/init.el")) + :desc "Edit doom packages.el" "p" #'(lambda () (interactive) (find-file "~/.config/doom/packages.el")))) +(map! :leader + (:prefix ("= e" . "open eshell files") + :desc "Edit eshell aliases" "a" #'(lambda () (interactive) (find-file "~/.config/doom/eshell/aliases")) + :desc "Edit eshell profile" "p" #'(lambda () (interactive) (find-file "~/.config/doom/eshell/profile")))) + +(map! :leader + :desc "Org babel tangle" "m B" #'org-babel-tangle) +(after! org + (setq org-directory "~/nc/Org/" + org-agenda-files '("~/nc/Org/agenda.org") + org-default-notes-file (expand-file-name "notes.org" org-directory) + org-ellipsis " ▼ " + org-superstar-headline-bullets-list '("◉" "●" "○" "◆" "●" "○" "◆") + org-superstar-item-bullet-alist '((?+ . ?➤) (?- . ?✦)) ; changes +/- symbols in item lists + org-log-done 'time + org-hide-emphasis-markers t + ;; ex. of org-link-abbrev-alist in action + ;; [[arch-wiki:Name_of_Page][Description]] + org-link-abbrev-alist ; This overwrites the default Doom org-link-abbrev-list + '(("google" . "http://www.google.com/search?q=") + ("arch-wiki" . "https://wiki.archlinux.org/index.php/") + ("ddg" . "https://duckduckgo.com/?q=") + ("wiki" . "https://en.wikipedia.org/wiki/")) + org-todo-keywords ; This overwrites the default Doom org-todo-keywords + '((sequence + "TODO(t)" ; A task that is ready to be tackled + "BLOG(b)" ; Blog writing assignments + "GYM(g)" ; Things to accomplish at the gym + "PROJ(p)" ; A project that contains other tasks + "VIDEO(v)" ; Video assignments + "WAIT(w)" ; Something is holding up this task + "|" ; The pipe necessary to separate "active" states and "inactive" states + "DONE(d)" ; Task has been completed + "CANCELLED(c)" )))) ; Task has been cancelled + +(defun dt/org-colors-doom-one () + "Enable Doom One colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#51afef" ultra-bold) + (org-level-2 1.6 "#c678dd" extra-bold) + (org-level-3 1.5 "#98be65" bold) + (org-level-4 1.4 "#da8548" semi-bold) + (org-level-5 1.3 "#5699af" normal) + (org-level-6 1.2 "#a9a1e1" normal) + (org-level-7 1.1 "#46d9ff" normal) + (org-level-8 1.0 "#ff6c6b" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-dracula () + "Enable Dracula colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#8be9fd" ultra-bold) + (org-level-2 1.6 "#bd93f9" extra-bold) + (org-level-3 1.5 "#50fa7b" bold) + (org-level-4 1.4 "#ff79c6" semi-bold) + (org-level-5 1.3 "#9aedfe" normal) + (org-level-6 1.2 "#caa9fa" normal) + (org-level-7 1.1 "#5af78e" normal) + (org-level-8 1.0 "#ff92d0" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-gruvbox-dark () + "Enable Gruvbox Dark colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#458588" ultra-bold) + (org-level-2 1.6 "#b16286" extra-bold) + (org-level-3 1.5 "#98971a" bold) + (org-level-4 1.4 "#fb4934" semi-bold) + (org-level-5 1.3 "#83a598" normal) + (org-level-6 1.2 "#d3869b" normal) + (org-level-7 1.1 "#d79921" normal) + (org-level-8 1.0 "#8ec07c" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-monokai-pro () + "Enable Monokai Pro colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#78dce8" ultra-bold) + (org-level-2 1.6 "#ab9df2" extra-bold) + (org-level-3 1.5 "#a9dc76" bold) + (org-level-4 1.4 "#fc9867" semi-bold) + (org-level-5 1.3 "#ff6188" normal) + (org-level-6 1.2 "#ffd866" normal) + (org-level-7 1.1 "#78dce8" normal) + (org-level-8 1.0 "#ab9df2" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-nord () + "Enable Nord colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#81a1c1" ultra-bold) + (org-level-2 1.6 "#b48ead" extra-bold) + (org-level-3 1.5 "#a3be8c" bold) + (org-level-4 1.4 "#ebcb8b" semi-bold) + (org-level-5 1.3 "#bf616a" normal) + (org-level-6 1.2 "#88c0d0" normal) + (org-level-7 1.1 "#81a1c1" normal) + (org-level-8 1.0 "#b48ead" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-oceanic-next () + "Enable Oceanic Next colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#6699cc" ultra-bold) + (org-level-2 1.6 "#c594c5" extra-bold) + (org-level-3 1.5 "#99c794" bold) + (org-level-4 1.4 "#fac863" semi-bold) + (org-level-5 1.3 "#5fb3b3" normal) + (org-level-6 1.2 "#ec5f67" normal) + (org-level-7 1.1 "#6699cc" normal) + (org-level-8 1.0 "#c594c5" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-palenight () + "Enable Palenight colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#82aaff" ultra-bold) + (org-level-2 1.6 "#c792ea" extra-bold) + (org-level-3 1.5 "#c3e88d" bold) + (org-level-4 1.4 "#ffcb6b" semi-bold) + (org-level-5 1.3 "#a3f7ff" normal) + (org-level-6 1.2 "#e1acff" normal) + (org-level-7 1.1 "#f07178" normal) + (org-level-8 1.0 "#ddffa7" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-solarized-dark () + "Enable Solarized Dark colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#268bd2" ultra-bold) + (org-level-2 1.6 "#d33682" extra-bold) + (org-level-3 1.5 "#859900" bold) + (org-level-4 1.4 "#b58900" semi-bold) + (org-level-5 1.3 "#cb4b16" normal) + (org-level-6 1.2 "#6c71c4" normal) + (org-level-7 1.1 "#2aa198" normal) + (org-level-8 1.0 "#657b83" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-solarized-light () + "Enable Solarized Light colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#268bd2" ultra-bold) + (org-level-2 1.6 "#d33682" extra-bold) + (org-level-3 1.5 "#859900" bold) + (org-level-4 1.4 "#b58900" semi-bold) + (org-level-5 1.3 "#cb4b16" normal) + (org-level-6 1.2 "#6c71c4" normal) + (org-level-7 1.1 "#2aa198" normal) + (org-level-8 1.0 "#657b83" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-tomorrow-night () + "Enable Tomorrow Night colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#81a2be" ultra-bold) + (org-level-2 1.6 "#b294bb" extra-bold) + (org-level-3 1.5 "#b5bd68" bold) + (org-level-4 1.4 "#e6c547" semi-bold) + (org-level-5 1.3 "#cc6666" normal) + (org-level-6 1.2 "#70c0ba" normal) + (org-level-7 1.1 "#b77ee0" normal) + (org-level-8 1.0 "#9ec400" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +;; Load our desired dt/org-colors-* theme on startup +(dt/org-colors-tomorrow-night) + +(use-package ox-man) +(use-package ox-gemini) + +(setq org-journal-dir "~/nc/Org/journal/" + org-journal-date-prefix "* " + org-journal-time-prefix "** " + org-journal-date-format "%B %d, %Y (%A) " + org-journal-file-format "%Y-%m-%d.org") + +(setq org-publish-use-timestamps-flag nil) +(setq org-export-with-broken-links t) + +(use-package! org-auto-tangle + :defer t + :hook (org-mode . org-auto-tangle-mode) + :config + (setq org-auto-tangle-default t)) + +(map! :leader + :desc "Switch to perspective NAME" "DEL" #'persp-switch + :desc "Switch to buffer in perspective" "," #'persp-switch-to-buffer + :desc "Switch to next perspective" "]" #'persp-next + :desc "Switch to previous perspective" "[" #'persp-prev + :desc "Add a buffer current perspective" "+" #'persp-add-buffer + :desc "Remove perspective by name" "-" #'persp-remove-by-name) + +(define-globalized-minor-mode global-rainbow-mode rainbow-mode + (lambda () (rainbow-mode 1))) +(global-rainbow-mode 1 ) + +(map! :leader + (:prefix ("r" . "registers") + :desc "Copy to register" "c" #'copy-to-register + :desc "Frameset to register" "f" #'frameset-to-register + :desc "Insert contents of register" "i" #'insert-register + :desc "Jump to register" "j" #'jump-to-register + :desc "List registers" "l" #'list-registers + :desc "Number to register" "n" #'number-to-register + :desc "Interactively choose a register" "r" #'counsel-register + :desc "View a register" "v" #'view-register + :desc "Window configuration to register" "w" #'window-configuration-to-register + :desc "Increment register" "+" #'increment-register + :desc "Point to register" "SPC" #'point-to-register)) + +(setq shell-file-name "/bin/bash" + vterm-max-scrollback 5000) +(setq eshell-rc-script "~/.config/doom/eshell/profile" + eshell-aliases-file "~/.config/doom/eshell/aliases" + eshell-history-size 5000 + eshell-buffer-maximum-lines 5000 + eshell-hist-ignoredups t + eshell-scroll-to-bottom-on-input t + eshell-destroy-buffer-when-process-dies t + eshell-visual-commands'("bash" "fish" "htop" "ssh" "top" "zsh")) +(map! :leader + :desc "Eshell" "e s" #'eshell + :desc "Eshell popup toggle" "e t" #'+eshell/toggle + :desc "Counsel eshell history" "e h" #'counsel-esh-history + :desc "Vterm popup toggle" "v t" #'+vterm/toggle) + +(defun prefer-horizontal-split () + (set-variable 'split-height-threshold nil t) + (set-variable 'split-width-threshold 40 t)) ; make this as low as needed +(add-hook 'markdown-mode-hook 'prefer-horizontal-split) +(map! :leader + :desc "Clone indirect buffer other window" "b c" #'clone-indirect-buffer-other-window) + +(map! :leader + (:prefix ("w" . "window") + :desc "Winner redo" "" #'winner-redo + :desc "Winner undo" "" #'winner-undo)) + +(map! :leader + :desc "Zap to char" "z" #'zap-to-char + :desc "Zap up to char" "Z" #'zap-up-to-char) + +(set-frame-parameter (selected-frame) 'alpha '(98 . 80)) +(add-to-list 'default-frame-alist '(alpha . (98 . 80))) + +(add-hook 'prog-mode-hook #'lsp) diff --git a/user/.config/doom/config.org b/user/.config/doom/config.org new file mode 100644 index 000000000..209981ef7 --- /dev/null +++ b/user/.config/doom/config.org @@ -0,0 +1,1136 @@ +#+TITLE: DRK's Doom Emacs Config +#+AUTHOR: Clay Gomera (Drake) +#+DESCRIPTION: DRK's personal Doom Emacs config. +#+STARTUP: showeverything +#+PROPERTY: header-args :tangle config.el + +* TABLE OF CONTENTS :toc: +- [[#about-this-config][About this config]] +- [[#beacon][Beacon]] +- [[#bookmarks-and-buffers][Bookmarks and buffers]] + - [[#bookmarks][Bookmarks]] + - [[#buffers][Buffers]] + - [[#global-auto-revert][Global Auto Revert]] + - [[#keybindings-within-ibuffer-mode][Keybindings within ibuffer mode]] +- [[#calendar][Calendar]] +- [[#dashboard][Dashboard]] + - [[#configuring-dashboard][Configuring Dashboard]] + - [[#dashboard-in-emacsclient][Dashboard in Emacsclient]] +- [[#dired][Dired]] + - [[#keybindings-to-open-dired][Keybindings To Open Dired]] + - [[#keybindings-within-dired][Keybindings Within Dired]] + - [[#keybindings-within-dired-with-peep-dired-mode-enabled][Keybindings Within Dired With Peep-Dired-Mode Enabled]] + - [[#making-deleted-files-go-to-trash-can][Making deleted files go to trash can]] +- [[#doom-theme][Doom theme]] +- [[#emojis][Emojis]] +- [[#evaluate-elisp-expressions][Evaluate elisp expressions]] +- [[#eww][Eww]] +- [[#fonts][Fonts]] +- [[#imenu][Imenu]] +- [[#insert-date][Insert date]] +- [[#ivy][Ivy]] + - [[#ivy-posframe][Ivy-posframe]] + - [[#ivy-keybindings][Ivy keybindings]] +- [[#line-settings][Line settings]] +- [[#markdown][Markdown]] +- [[#minimap][Minimap]] +- [[#modeline][Modeline]] +- [[#mouse-support][Mouse support]] +- [[#neotree][Neotree]] +- [[#open-specific-files][Open specific files]] +- [[#org-mode][Org mode]] + - [[#org-fonts][Org fonts]] + - [[#org-export][Org-export]] + - [[#org-journal][Org-journal]] + - [[#org-publish][Org-publish]] + - [[#org-auto-tangle][Org-auto-tangle]] +- [[#perspective][Perspective]] +- [[#rainbow-mode][Rainbow mode]] +- [[#registers][Registers]] +- [[#shells][Shells]] +- [[#splits][Splits]] +- [[#winner-mode][Winner mode]] +- [[#zap-to-char][Zap to char]] +- [[#transparency][Transparency]] +- [[#autostart-lsp][Autostart lsp]] + +* About this config +This is my personal Doom Emacs config. Doom Emacs is a distribution of Emacs +that uses the "evil" keybindings (Vim keybindings) and includes a number of nice +extensions and a bit of configuration out of the box. I am maintaining this +config not just for myself, but also for those that want to explore some of what +is possible with Emacs. I will add a lot of examples of plugins and settings, +some of them I may not even use personally. This config is a fork of +DistroTube's config. + +* Beacon +Never lose your cursor. When you scroll, your cursor will shine! This is a +global minor-mode. Turn it on everywhere with: + +#+begin_src emacs-lisp +(beacon-mode 1) +#+end_src + +* Bookmarks and buffers +Doom Emacs uses 'SPC b' for keybindings related to bookmarks and buffers. + +** Bookmarks +Bookmarks are somewhat like registers in that they record positions you can jump +to. Unlike registers, they have long names, and they persist automatically from +one Emacs session to the next. The prototypical use of bookmarks is to record +where you were reading in various files. + +#+BEGIN_SRC emacs-lisp +(map! :leader + (:prefix ("b". "buffer") + :desc "List bookmarks" "L" #'list-bookmarks + :desc "Save current bookmarks to bookmark file" "w" #'bookmark-save)) +#+END_SRC + +** Buffers +Regarding /buffers/, the text you are editing in Emacs resides in an object called +a /buffer/. Each time you visit a file, a buffer is used to hold the file’s text. +Each time you invoke Dired, a buffer is used to hold the directory listing. +/Ibuffer/ is a program that lists all of your Emacs /buffers/, allowing you to +navigate between them and filter them. + +| COMMAND | DESCRIPTION | KEYBINDING | +|-----------------+----------------------+------------| +| ibuffer | Launch ibuffer | SPC b i | +| kill-buffer | Kill current buffer | SPC b k | +| next-buffer | Goto next buffer | SPC b n | +| previous-buffer | Goto previous buffer | SPC b p | +| save-buffer | Save current buffer | SPC b s | + +** Global Auto Revert +A buffer can get out of sync with respect to its visited file on disk if that +file is changed by another program. To keep it up to date, you can enable Auto +Revert mode by typing M-x auto-revert-mode, or you can set it to be turned on +globally with 'global-auto-revert-mode'. I have also turned on Global Auto +Revert on non-file buffers, which is especially useful for 'dired' buffers. + +#+begin_src emacs-lisp +(global-auto-revert-mode 1) +(setq global-auto-revert-non-file-buffers t) +#+end_src + +** Keybindings within ibuffer mode +| COMMAND | DESCRIPTION | KEYBINDING | +|-----------------------------------+----------------------------------------+------------| +| ibuffer-mark-forward | Mark the buffer | m | +| ibuffer-unmark-forward | Unmark the buffer | u | +| ibuffer-do-kill-on-deletion-marks | Kill the marked buffers | x | +| ibuffer-filter-by-content | Ibuffer filter by content | f c | +| ibuffer-filter-by-directory | Ibuffer filter by directory | f d | +| ibuffer-filter-by-filename | Ibuffer filter by filename (full path) | f f | +| ibuffer-filter-by-mode | Ibuffer filter by mode | f m | +| ibuffer-filter-by-name | Ibuffer filter by name | f n | +| ibuffer-filter-disable | Disable ibuffer filter | f x | +| ibuffer-do-kill-lines | Hide marked buffers | g h | +| ibuffer-update | Restore hidden buffers | g H | + +#+begin_src emacs-lisp +(evil-define-key 'normal ibuffer-mode-map + (kbd "f c") 'ibuffer-filter-by-content + (kbd "f d") 'ibuffer-filter-by-directory + (kbd "f f") 'ibuffer-filter-by-filename + (kbd "f m") 'ibuffer-filter-by-mode + (kbd "f n") 'ibuffer-filter-by-name + (kbd "f x") 'ibuffer-filter-disable + (kbd "g h") 'ibuffer-do-kill-lines + (kbd "g H") 'ibuffer-update) +#+end_src + +* Calendar +Let's make a 12-month calendar available so we can have a calendar app that, +when we click on time/date in xmobar, we get a nice 12-month calendar to view. + +This is a modification of: http://homepage3.nifty.com/oatu/emacs/calendar.html +See also: https://stackoverflow.com/questions/9547912/emacs-calendar-show-more-than-3-months + +#+begin_src emacs-lisp +;; https://stackoverflow.com/questions/9547912/emacs-calendar-show-more-than-3-months +(defun dt/year-calendar (&optional year) + (interactive) + (require 'calendar) + (let* ( + (current-year (number-to-string (nth 5 (decode-time (current-time))))) + (month 0) + (year (if year year (string-to-number (format-time-string "%Y" (current-time)))))) + (switch-to-buffer (get-buffer-create calendar-buffer)) + (when (not (eq major-mode 'calendar-mode)) + (calendar-mode)) + (setq displayed-month month) + (setq displayed-year year) + (setq buffer-read-only nil) + (erase-buffer) + ;; horizontal rows + (dotimes (j 4) + ;; vertical columns + (dotimes (i 3) + (calendar-generate-month + (setq month (+ month 1)) + year + ;; indentation / spacing between months + (+ 5 (* 25 i)))) + (goto-char (point-max)) + (insert (make-string (- 10 (count-lines (point-min) (point-max))) ?\n)) + (widen) + (goto-char (point-max)) + (narrow-to-region (point-max) (point-max))) + (widen) + (goto-char (point-min)) + (setq buffer-read-only t))) + +(defun dt/scroll-year-calendar-forward (&optional arg event) + "Scroll the yearly calendar by year in a forward direction." + (interactive (list (prefix-numeric-value current-prefix-arg) + last-nonmenu-event)) + (unless arg (setq arg 0)) + (save-selected-window + (if (setq event (event-start event)) (select-window (posn-window event))) + (unless (zerop arg) + (let* ( + (year (+ displayed-year arg))) + (dt/year-calendar year))) + (goto-char (point-min)) + (run-hooks 'calendar-move-hook))) + +(defun dt/scroll-year-calendar-backward (&optional arg event) + "Scroll the yearly calendar by year in a backward direction." + (interactive (list (prefix-numeric-value current-prefix-arg) + last-nonmenu-event)) + (dt/scroll-year-calendar-forward (- (or arg 1)) event)) + +(map! :leader + :desc "Scroll year calendar backward" "" #'dt/scroll-year-calendar-backward + :desc "Scroll year calendar forward" "" #'dt/scroll-year-calendar-forward) + +(defalias 'year-calendar 'dt/year-calendar) +#+end_src + +Let's also play around with calfw. +#+begin_src emacs-lisp +(use-package! calfw) +(use-package! calfw-org) +#+end_src + +* Dashboard +Emacs Dashboard is an extensible startup screen showing you recent files, +bookmarks, agenda items and an Emacs banner. + +** Configuring Dashboard +#+begin_src emacs-lisp +(use-package dashboard + :init ;; tweak dashboard config before loading it + (setq dashboard-set-heading-icons t) + (setq dashboard-set-file-icons t) + (setq dashboard-banner-logo-title "\nKEYBINDINGS:\ +\nFind file (SPC .) \ +Open buffer list (SPC b i)\ +\nFind recent files (SPC f r) \ +Open the eshell (SPC e s)\ +\nOpen dired file manager (SPC d d) \ +List of keybindings (SPC h b b)") + ;;(setq dashboard-startup-banner 'logo) ;; use standard emacs logo as banner + (setq initial-buffer-choice (lambda () (get-buffer "*dashboard*"))) + (setq dashboard-startup-banner "~/.config/doom/emacs-dash.txt") ;; use custom image as banner + (setq dashboard-center-content nil) ;; set to 't' for centered content + (setq dashboard-items '((recents . 5) + (agenda . 5 ) + (bookmarks . 5) + (projects . 5) + (registers . 5))) + :config + (dashboard-setup-startup-hook) + (dashboard-modify-heading-icons '((recents . "file-text") + (bookmarks . "book")))) +#+end_src + +** Dashboard in Emacsclient +This setting ensures that emacsclient always opens on *dashboard* rather than *scratch*. +#+begin_src emacs-lisp +(setq doom-fallback-buffer "*dashboard*") +#+end_src + +* Dired +Dired is the file manager within Emacs. Below, I setup keybindings for image +previews (peep-dired). Doom Emacs does not use 'SPC d' for any of its +keybindings, so I've chosen the format of 'SPC d' plus 'key'. + +** Keybindings To Open Dired + +| COMMAND | DESCRIPTION | KEYBINDING | +|------------+------------------------------------+------------| +| dired | /Open dired file manager/ | SPC d d | +| dired-jump | /Jump to current directory in dired/ | SPC d j | + +** Keybindings Within Dired +*** Basic dired commands + +| COMMAND | DESCRIPTION | KEYBINDING | +|-------------------------+---------------------------------------------+------------| +| dired-view-file | /View file in dired/ | SPC d v | +| dired-up-directory | /Go up in directory tree/ | h | +| dired-find-file | /Go down in directory tree (or open if file)/ | l | +| dired-next-line | Move down to next line | j | +| dired-previous-line | Move up to previous line | k | +| dired-mark | Mark file at point | m | +| dired-unmark | Unmark file at point | u | +| dired-do-copy | Copy current file or marked files | C | +| dired-do-rename | Rename current file or marked files | R | +| dired-hide-details | Toggle detailed listings on/off | ( | +| dired-git-info-mode | Toggle git information on/off | ) | +| dired-create-directory | Create new empty directory | + | +| dired-diff | Compare file at point with another | = | +| dired-subtree-toggle | Toggle viewing subtree at point | TAB | + +*** Dired commands using regex + +| COMMAND | DESCRIPTION | KEYBINDING | +|-------------------------+----------------------------+------------| +| dired-mark-files-regexp | Mark files using regex | % m | +| dired-do-copy-regexp | Copy files using regex | % C | +| dired-do-rename-regexp | Rename files using regex | % R | +| dired-mark-files-regexp | Mark all files using regex | * % | + +*** File permissions and ownership + +| COMMAND | DESCRIPTION | KEYBINDING | +|-----------------+----------------------------------+------------| +| dired-do-chgrp | Change the group of marked files | g G | +| dired-do-chmod | Change the mode of marked files | M | +| dired-do-chown | Change the owner of marked files | O | +| dired-do-rename | Rename file or all marked files | R | + +#+begin_src emacs-lisp +(map! :leader + (:prefix ("d" . "dired") + :desc "Open dired" "d" #'dired + :desc "Dired jump to current" "j" #'dired-jump) + (:after dired + (:map dired-mode-map + :desc "Peep-dired image previews" "d p" #'peep-dired + :desc "Dired view file" "d v" #'dired-view-file))) + +(evil-define-key 'normal dired-mode-map + (kbd "M-RET") 'dired-display-file + (kbd "h") 'dired-up-directory + (kbd "l") 'dired-open-file ; use dired-find-file instead of dired-open. + (kbd "m") 'dired-mark + (kbd "t") 'dired-toggle-marks + (kbd "u") 'dired-unmark + (kbd "C") 'dired-do-copy + (kbd "D") 'dired-do-delete + (kbd "J") 'dired-goto-file + (kbd "M") 'dired-do-chmod + (kbd "O") 'dired-do-chown + (kbd "P") 'dired-do-print + (kbd "R") 'dired-do-rename + (kbd "T") 'dired-do-touch + (kbd "Y") 'dired-copy-filenamecopy-filename-as-kill ; copies filename to kill ring. + (kbd "+") 'dired-create-directory + (kbd "-") 'dired-up-directory + (kbd "% l") 'dired-downcase + (kbd "% u") 'dired-upcase + (kbd "; d") 'epa-dired-do-decrypt + (kbd "; e") 'epa-dired-do-encrypt) +;; Get file icons in dired +(add-hook 'dired-mode-hook 'all-the-icons-dired-mode) +;; With dired-open plugin, you can launch external programs for certain extensions +;; For example, I set all .png files to open in 'sxiv' and all .mp4 files to open in 'mpv' +(setq dired-open-extensions '(("gif" . "sxiv") + ("jpg" . "sxiv") + ("png" . "sxiv") + ("mkv" . "mpv") + ("mp4" . "mpv"))) +#+end_src + +** Keybindings Within Dired With Peep-Dired-Mode Enabled +If peep-dired is enabled, you will get image previews as you go up/down with 'j' +and 'k' + +| COMMAND | DESCRIPTION | KEYBINDING | +|----------------------+------------------------------------------+------------| +| peep-dired | /Toggle previews within dired/ | SPC d p | +| peep-dired-next-file | /Move to next file in peep-dired-mode/ | j | +| peep-dired-prev-file | /Move to previous file in peep-dired-mode/ | k | + +#+BEGIN_SRC emacs-lisp +(evil-define-key 'normal peep-dired-mode-map + (kbd "j") 'peep-dired-next-file + (kbd "k") 'peep-dired-prev-file) +(add-hook 'peep-dired-hook 'evil-normalize-keymaps) +#+END_SRC + +** Making deleted files go to trash can +#+begin_src emacs-lisp +(setq delete-by-moving-to-trash t + trash-directory "~/.local/share/Trash/files/") +#+end_src + +* Doom theme +Setting the theme to doom-gruvbox. To try out new themes, I set a keybinding for +counsel-load-theme with 'SPC h t'. + +#+BEGIN_SRC emacs-lisp +(setq doom-theme 'doom-gruvbox) +(map! :leader + :desc "Load new theme" "h t" #'counsel-load-theme) +#+END_SRC + +* Emojis +Emojify is an Emacs extension to display emojis. It can display github style +emojis like :smile: or plain ascii ones like :). + +#+begin_src emacs-lisp +(use-package emojify + :hook (after-init . global-emojify-mode)) +#+end_src + +* Evaluate elisp expressions +Changing some keybindings from their defaults to better fit with Doom Emacs, and +to avoid conflicts with my window managers which sometimes use the control key +in their keybindings. By default, Doom Emacs does not use 'SPC e' for anything, +so I choose to use the format 'SPC e' plus 'key' for these (I also use 'SPC e' +for 'eww' keybindings). + +| COMMAND | DESCRIPTION | KEYBINDING | +|-----------------+----------------------------------------------+------------| +| eval-buffer | /Evaluate elisp in buffer/ | SPC e b | +| eval-defun | /Evaluate the defun containing or after point/ | SPC e d | +| eval-expression | /Evaluate an elisp expression/ | SPC e e | +| eval-last-sexp | /Evaluate elisp expression before point/ | SPC e l | +| eval-region | /Evaluate elisp in region/ | SPC e r | + +#+Begin_src emacs-lisp +(map! :leader + (:prefix ("e". "evaluate/EWW") + :desc "Evaluate elisp in buffer" "b" #'eval-buffer + :desc "Evaluate defun" "d" #'eval-defun + :desc "Evaluate elisp expression" "e" #'eval-expression + :desc "Evaluate last sexpression" "l" #'eval-last-sexp + :desc "Evaluate elisp in region" "r" #'eval-region)) +#+END_SRC + +* Eww +EWW is the Emacs Web Wowser, the builtin browser in Emacs. Below I set urls to +open in a specific browser (eww) with browse-url-browser-function. By default, +Doom Emacs does not use 'SPC e' for anything, so I choose to use the format 'SPC +e' plus 'key' for these (I also use 'SPC e' for 'eval' keybindings). I chose to +use 'SPC s w' for eww-search-words because Doom Emacs uses 'SPC s' for 'search' +commands. + +#+BEGIN_SRC emacs-lisp +(setq browse-url-browser-function 'eww-browse-url) +(map! :leader + :desc "Search web for text between BEG/END" + "s w" #'eww-search-words + (:prefix ("e" . "evaluate/EWW") + :desc "Eww web browser" "w" #'eww + :desc "Eww reload page" "R" #'eww-reload)) +#+END_SRC + +* Fonts +Settings related to fonts within Doom Emacs: ++ 'doom-font' -- standard monospace font that is used for most things in Emacs. ++ 'doom-variable-pitch-font' -- variable font which is useful in some Emacs plugins. ++ 'doom-big-font' -- used in doom-big-font-mode; useful for presentations. ++ 'font-lock-comment-face' -- for comments. ++ 'font-lock-keyword-face' -- for keywords with special significanclike 'setq' in elisp. + +#+BEGIN_SRC emacs-lisp +(setq doom-font (font-spec :family "mononoki Nerd Font" :size 15) + doom-variable-pitch-font (font-spec :family "mononoki Nerd Font" :size 15) + doom-big-font (font-spec :family "mononoki Nerd Font" :size 20)) +(after! doom-themes + (setq doom-themes-enable-bold t + doom-themes-enable-italic t)) +(custom-set-faces! + '(font-lock-comment-face :slant italic) + '(font-lock-keyword-face :slant italic)) +#+END_SRC + +* Imenu +Imenu produces menus for accessing locations in documents, typically in the +current buffer. You can access the locations using an ordinary menu (menu bar or +other) or using minibuffer completion, or you can install 'imenu-list' and have +the imenu displayed as a vertical split that you can toggle show/hide. + +| COMMAND | DESCRIPTION | KEYBINDING | +|-------------------------+----------------------------------+------------| +| counsel-imenu | /Menu to jump to places in buffer/ | SPC s i | +| imenu-list-smart-toggle | /Toggle imenu shown in a sidebar/ | SPC t i | + +#+BEGIN_SRC emacs-lisp +(setq imenu-list-focus-after-activation t) + +(map! :leader + (:prefix ("s" . "Search") + :desc "Menu to jump to places in buffer" "i" #'counsel-imenu)) + +(map! :leader + (:prefix ("t" . "Toggle") + :desc "Toggle imenu shown in a sidebar" "i" #'imenu-list-smart-toggle)) + +#+END_SRC + +* Insert date +Some custom functions to insert the date. The function 'insert-todays-date' can +be used one of three different ways: (1) just the keybinding without the +universal argument prefix, (2) with one universal argument prefix, or (3) with +two universal argument prefixes. The universal argument prefix is 'SPC-u' in +Doom Emacs (C-u in standard GNU Emacs). The function 'insert-any-date' only +outputs to one format, which is the same format as 'insert-todays-date' without +a prefix. + +| COMMAND | EXAMPLE OUTPUT | KEYBINDING | +|-----------------------+---------------------------+-----------------------| +| dt/insert-todays-date | Friday, November 19, 2021 | SPC i d t | +| dt/insert-todays-date | 11-19-2021 | SPC u SPC i d t | +| dt/insert-todays-date | 2021-11-19 | SPC u SPC u SPC i d t | +| dt/insert-any-date | Friday, November 19, 2021 | SPC i d a | + +#+begin_src emacs-lisp +(defun dt/insert-todays-date (prefix) + (interactive "P") + (let ((format (cond + ((not prefix) "%A, %B %d, %Y") + ((equal prefix '(4)) "%m-%d-%Y") + ((equal prefix '(16)) "%Y-%m-%d")))) + (insert (format-time-string format)))) + +(require 'calendar) +(defun dt/insert-any-date (date) + "Insert DATE using the current locale." + (interactive (list (calendar-read-date))) + (insert (calendar-date-string date))) + +(map! :leader + (:prefix ("i d" . "Insert date") + :desc "Insert any date" "a" #'dt/insert-any-date + :desc "Insert todays date" "t" #'dt/insert-todays-date)) +#+end_src + +* Ivy +Ivy is a generic completion mechanism for Emacs. + +** Ivy-posframe +Ivy-posframe is an ivy extension, which lets ivy use posframe to show its +candidate menu. Some of the settings below involve: ++ ivy-posframe-display-functions-alist -- sets the display position for specific + programs ++ ivy-posframe-height-alist -- sets the height of the list displayed for + specific programs + +# Available functions (positions) for 'ivy-posframe-display-functions-alist' ++ ivy-posframe-display-at-frame-center ++ ivy-posframe-display-at-window-center ++ ivy-posframe-display-at-frame-bottom-left ++ ivy-posframe-display-at-window-bottom-left ++ ivy-posframe-display-at-frame-bottom-window-center ++ ivy-posframe-display-at-point ++ ivy-posframe-display-at-frame-top-center + +=NOTE:= If the setting for 'ivy-posframe-display' is set to 'nil' (false), +anything that is set to 'ivy-display-function-fallback' will just default to +their normal position in Doom Emacs (usually a bottom split). However, if this +is set to 't' (true), then the fallback position will be centered in the window. + +#+BEGIN_SRC emacs-lisp +(setq ivy-posframe-display-functions-alist + '((swiper . ivy-posframe-display-at-point) + (complete-symbol . ivy-posframe-display-at-point) + (counsel-M-x . ivy-display-function-fallback) + (counsel-esh-history . ivy-posframe-display-at-window-center) + (counsel-describe-function . ivy-display-function-fallback) + (counsel-describe-variable . ivy-display-function-fallback) + (counsel-find-file . ivy-display-function-fallback) + (counsel-recentf . ivy-display-function-fallback) + (counsel-register . ivy-posframe-display-at-frame-bottom-window-center) + (dmenu . ivy-posframe-display-at-frame-top-center) + (nil . ivy-posframe-display)) + ivy-posframe-height-alist + '((swiper . 20) + (dmenu . 20) + (t . 10))) +(ivy-posframe-mode 1) ; 1 enables posframe-mode, 0 disables it. +#+END_SRC + +** Ivy keybindings +By default, Doom Emacs does not use 'SPC v', so the format I use for these +bindings is 'SPC v' plus 'key'. + +#+BEGIN_SRC emacs-lisp +(map! :leader + (:prefix ("v" . "Ivy") + :desc "Ivy push view" "v p" #'ivy-push-view + :desc "Ivy switch view" "v s" #'ivy-switch-view)) +#+END_SRC + +* Line settings +I set comment-line to 'SPC TAB TAB' which is a rather comfortable keybinding for +me on my ZSA Moonlander keyboard. The standard Emacs keybinding for +comment-line is 'C-x C-;'. The other keybindings are for commands that toggle +on/off various line-related settings. Doom Emacs uses 'SPC t' for "toggle" +commands, so I choose 'SPC t' plus 'key' for those bindings. + +| COMMAND | DESCRIPTION | KEYBINDING | +|--------------------------+-------------------------------------------+-------------| +| comment-line | /Comment or uncomment lines/ | SPC TAB TAB | +| hl-line-mode | /Toggle line highlighting in current frame/ | SPC t h | +| global-hl-line-mode | /Toggle line highlighting globally/ | SPC t H | +| doom/toggle-line-numbers | /Toggle line numbers/ | SPC t l | +| toggle-truncate-lines | /Toggle truncate lines/ | SPC t t | + +#+BEGIN_SRC emacs-lisp +(setq display-line-numbers-type t) +(map! :leader + :desc "Comment or uncomment lines" "TAB TAB" #'comment-line + (:prefix ("t" . "toggle") + :desc "Toggle line numbers" "l" #'doom/toggle-line-numbers + :desc "Toggle line highlight in frame" "h" #'hl-line-mode + :desc "Toggle line highlight globally" "H" #'global-hl-line-mode + :desc "Toggle truncate lines" "t" #'toggle-truncate-lines)) +#+END_SRC + +* Markdown + +#+begin_src emacs-lisp +(custom-set-faces + '(markdown-header-face ((t (:inherit font-lock-function-name-face :weight bold :family "variable-pitch")))) + '(markdown-header-face-1 ((t (:inherit markdown-header-face :height 1.7)))) + '(markdown-header-face-2 ((t (:inherit markdown-header-face :height 1.6)))) + '(markdown-header-face-3 ((t (:inherit markdown-header-face :height 1.5)))) + '(markdown-header-face-4 ((t (:inherit markdown-header-face :height 1.4)))) + '(markdown-header-face-5 ((t (:inherit markdown-header-face :height 1.3)))) + '(markdown-header-face-6 ((t (:inherit markdown-header-face :height 1.2))))) +#+end_src + +* Minimap +A minimap sidebar displaying a smaller version of the current buffer on either +the left or right side. It highlights the currently shown region and updates its +position automatically. Be aware that this minimap program does not work in Org +documents. This is not unusual though because I have tried several minimap +programs and none of them can handle Org. + +| COMMAND | DESCRIPTION | KEYBINDING | +|--------------+-------------------------------------------+------------| +| minimap-mode | /Toggle minimap-mode/ | SPC t m | + +#+begin_src emacs-lisp +(setq minimap-window-location 'right) +(map! :leader + (:prefix ("t" . "toggle") + :desc "Toggle minimap-mode" "m" #'minimap-mode)) +#+end_src + +* Modeline +The modeline is the bottom status bar that appears in Emacs windows. For more +information on what is available to configure in the Doom modeline, check out: +https://github.com/seagle0128/doom-modeline + +#+begin_src emacs-lisp +(set-face-attribute 'mode-line nil :font "mononoki Nerd Font-13") +(setq doom-modeline-height 30 ;; sets modeline height + doom-modeline-bar-width 5 ;; sets right bar width + doom-modeline-persp-name t ;; adds perspective name to modeline + doom-modeline-persp-icon t) ;; adds folder icon next to persp name +#+end_src + +* Mouse support +Adding mouse support in the terminal version of Emacs. + +#+begin_src emacs-lisp +(xterm-mouse-mode 1) +#+end_src + +* Neotree +Neotree is a file tree viewer. When you open neotree, it jumps to the current +file thanks to neo-smart-open. The neo-window-fixed-size setting makes the +neotree width be adjustable. Doom Emacs had no keybindings set for neotree. +Since Doom Emacs uses 'SPC t' for 'toggle' keybindings, I used 'SPC t n' for +toggle-neotree. + +| COMMAND | DESCRIPTION | KEYBINDING | +|----------------+---------------------------+------------| +| neotree-toggle | /Toggle neotree/ | SPC t n | +| neotree- dir | /Open directory in neotree/ | SPC d n | + +#+BEGIN_SRC emacs-lisp +(after! neotree + (setq neo-smart-open t + neo-window-fixed-size nil)) +(after! doom-themes + (setq doom-neotree-enable-variable-pitch t)) +(map! :leader + :desc "Toggle neotree file viewer" "t n" #'neotree-toggle + :desc "Open directory in neotree" "d n" #'neotree-dir) +#+END_SRC + +* Open specific files +Keybindings to open files that I work with all the time using the find-file +command, which is the interactive file search that opens with 'C-x C-f' in GNU +Emacs or 'SPC f f' in Doom Emacs. These keybindings use find-file +non-interactively since we specify exactly what file to open. The format I use +for these bindings is 'SPC =' plus 'key' since Doom Emacs does not use 'SPC ='. + +| PATH TO FILE | DESCRIPTION | KEYBINDING | +|--------------------------------+-----------------------+------------| +| ~/Org/agenda.org | /Edit agenda file/ | SPC = a | +| ~/.config/doom/config.org" | /Edit doom config.org/ | SPC = c | +| ~/.config/doom/init.el" | /Edit doom init.el/ | SPC = i | +| ~/.config/doom/packages.el" | /Edit doom packages.el/ | SPC = p | +| ~/.config/doom/eshell/aliases" | /Edit eshell aliases/ | SPC = e a | +| ~/.config/doom/eshell/profile" | /Edit eshell profile/ | SPC = e p | + +#+BEGIN_SRC emacs-lisp +(map! :leader + (:prefix ("=" . "open file") + :desc "Edit agenda file" "a" #'(lambda () (interactive) (find-file "~/Org/agenda.org")) + :desc "Edit doom config.org" "c" #'(lambda () (interactive) (find-file "~/.config/doom/config.org")) + :desc "Edit doom init.el" "i" #'(lambda () (interactive) (find-file "~/.config/doom/init.el")) + :desc "Edit doom packages.el" "p" #'(lambda () (interactive) (find-file "~/.config/doom/packages.el")))) +(map! :leader + (:prefix ("= e" . "open eshell files") + :desc "Edit eshell aliases" "a" #'(lambda () (interactive) (find-file "~/.config/doom/eshell/aliases")) + :desc "Edit eshell profile" "p" #'(lambda () (interactive) (find-file "~/.config/doom/eshell/profile")))) +#+END_SRC + +* Org mode +I wrapped most of this block in (after! org). Without this, my settings might +be evaluated too early, which will result in my settings being overwritten by +Doom's defaults. I have also enabled org-journal, org-superstar and org-roam by +adding (+journal +pretty +roam2) to the org section of my Doom Emacs init.el. + +=NOTE:= I have the location of my Org directory and Roam directory in $HOME/nc/ +which is a Nextcloud folder that allows me to instantly sync all of my Org work +between my home computer and my office computer. + +#+BEGIN_SRC emacs-lisp +(map! :leader + :desc "Org babel tangle" "m B" #'org-babel-tangle) +(after! org + (setq org-directory "~/nc/Org/" + org-agenda-files '("~/nc/Org/agenda.org") + org-default-notes-file (expand-file-name "notes.org" org-directory) + org-ellipsis " ▼ " + org-superstar-headline-bullets-list '("◉" "●" "○" "◆" "●" "○" "◆") + org-superstar-item-bullet-alist '((?+ . ?➤) (?- . ?✦)) ; changes +/- symbols in item lists + org-log-done 'time + org-hide-emphasis-markers t + ;; ex. of org-link-abbrev-alist in action + ;; [[arch-wiki:Name_of_Page][Description]] + org-link-abbrev-alist ; This overwrites the default Doom org-link-abbrev-list + '(("google" . "http://www.google.com/search?q=") + ("arch-wiki" . "https://wiki.archlinux.org/index.php/") + ("ddg" . "https://duckduckgo.com/?q=") + ("wiki" . "https://en.wikipedia.org/wiki/")) + org-todo-keywords ; This overwrites the default Doom org-todo-keywords + '((sequence + "TODO(t)" ; A task that is ready to be tackled + "BLOG(b)" ; Blog writing assignments + "GYM(g)" ; Things to accomplish at the gym + "PROJ(p)" ; A project that contains other tasks + "VIDEO(v)" ; Video assignments + "WAIT(w)" ; Something is holding up this task + "|" ; The pipe necessary to separate "active" states and "inactive" states + "DONE(d)" ; Task has been completed + "CANCELLED(c)" )))) ; Task has been cancelled +#+END_SRC + +** Org fonts +I have created an interactive function for each color scheme (M-x +dt/org-colors-*). These functions will set appropriate colors and font +attributes for org-level fonts and the org-table font. + +#+begin_src emacs-lisp + +(defun dt/org-colors-doom-one () + "Enable Doom One colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#51afef" ultra-bold) + (org-level-2 1.6 "#c678dd" extra-bold) + (org-level-3 1.5 "#98be65" bold) + (org-level-4 1.4 "#da8548" semi-bold) + (org-level-5 1.3 "#5699af" normal) + (org-level-6 1.2 "#a9a1e1" normal) + (org-level-7 1.1 "#46d9ff" normal) + (org-level-8 1.0 "#ff6c6b" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-dracula () + "Enable Dracula colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#8be9fd" ultra-bold) + (org-level-2 1.6 "#bd93f9" extra-bold) + (org-level-3 1.5 "#50fa7b" bold) + (org-level-4 1.4 "#ff79c6" semi-bold) + (org-level-5 1.3 "#9aedfe" normal) + (org-level-6 1.2 "#caa9fa" normal) + (org-level-7 1.1 "#5af78e" normal) + (org-level-8 1.0 "#ff92d0" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-gruvbox-dark () + "Enable Gruvbox Dark colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#458588" ultra-bold) + (org-level-2 1.6 "#b16286" extra-bold) + (org-level-3 1.5 "#98971a" bold) + (org-level-4 1.4 "#fb4934" semi-bold) + (org-level-5 1.3 "#83a598" normal) + (org-level-6 1.2 "#d3869b" normal) + (org-level-7 1.1 "#d79921" normal) + (org-level-8 1.0 "#8ec07c" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-monokai-pro () + "Enable Monokai Pro colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#78dce8" ultra-bold) + (org-level-2 1.6 "#ab9df2" extra-bold) + (org-level-3 1.5 "#a9dc76" bold) + (org-level-4 1.4 "#fc9867" semi-bold) + (org-level-5 1.3 "#ff6188" normal) + (org-level-6 1.2 "#ffd866" normal) + (org-level-7 1.1 "#78dce8" normal) + (org-level-8 1.0 "#ab9df2" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-nord () + "Enable Nord colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#81a1c1" ultra-bold) + (org-level-2 1.6 "#b48ead" extra-bold) + (org-level-3 1.5 "#a3be8c" bold) + (org-level-4 1.4 "#ebcb8b" semi-bold) + (org-level-5 1.3 "#bf616a" normal) + (org-level-6 1.2 "#88c0d0" normal) + (org-level-7 1.1 "#81a1c1" normal) + (org-level-8 1.0 "#b48ead" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-oceanic-next () + "Enable Oceanic Next colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#6699cc" ultra-bold) + (org-level-2 1.6 "#c594c5" extra-bold) + (org-level-3 1.5 "#99c794" bold) + (org-level-4 1.4 "#fac863" semi-bold) + (org-level-5 1.3 "#5fb3b3" normal) + (org-level-6 1.2 "#ec5f67" normal) + (org-level-7 1.1 "#6699cc" normal) + (org-level-8 1.0 "#c594c5" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-palenight () + "Enable Palenight colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#82aaff" ultra-bold) + (org-level-2 1.6 "#c792ea" extra-bold) + (org-level-3 1.5 "#c3e88d" bold) + (org-level-4 1.4 "#ffcb6b" semi-bold) + (org-level-5 1.3 "#a3f7ff" normal) + (org-level-6 1.2 "#e1acff" normal) + (org-level-7 1.1 "#f07178" normal) + (org-level-8 1.0 "#ddffa7" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-solarized-dark () + "Enable Solarized Dark colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#268bd2" ultra-bold) + (org-level-2 1.6 "#d33682" extra-bold) + (org-level-3 1.5 "#859900" bold) + (org-level-4 1.4 "#b58900" semi-bold) + (org-level-5 1.3 "#cb4b16" normal) + (org-level-6 1.2 "#6c71c4" normal) + (org-level-7 1.1 "#2aa198" normal) + (org-level-8 1.0 "#657b83" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-solarized-light () + "Enable Solarized Light colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#268bd2" ultra-bold) + (org-level-2 1.6 "#d33682" extra-bold) + (org-level-3 1.5 "#859900" bold) + (org-level-4 1.4 "#b58900" semi-bold) + (org-level-5 1.3 "#cb4b16" normal) + (org-level-6 1.2 "#6c71c4" normal) + (org-level-7 1.1 "#2aa198" normal) + (org-level-8 1.0 "#657b83" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +(defun dt/org-colors-tomorrow-night () + "Enable Tomorrow Night colors for Org headers." + (interactive) + (dolist + (face + '((org-level-1 1.7 "#81a2be" ultra-bold) + (org-level-2 1.6 "#b294bb" extra-bold) + (org-level-3 1.5 "#b5bd68" bold) + (org-level-4 1.4 "#e6c547" semi-bold) + (org-level-5 1.3 "#cc6666" normal) + (org-level-6 1.2 "#70c0ba" normal) + (org-level-7 1.1 "#b77ee0" normal) + (org-level-8 1.0 "#9ec400" normal))) + (set-face-attribute (nth 0 face) nil :font doom-variable-pitch-font :weight (nth 3 face) :height (nth 1 face) :foreground (nth 2 face))) + (set-face-attribute 'org-table nil :font doom-font :weight 'normal :height 1.0 :foreground "#bfafdf")) + +;; Load our desired dt/org-colors-* theme on startup +(dt/org-colors-tomorrow-night) + +#+end_src + +** Org-export +We need ox-man for "Org eXporting" to manpage format and ox-gemini for exporting +to gemtext (for the gemini protocol). + +=NOTE:= I also enable ox-publish for converting an Org site into an HTML site, +but that is done in init.el (org +publish). + +#+BEGIN_SRC emacs-lisp +(use-package ox-man) +(use-package ox-gemini) +#+END_SRC + +** Org-journal +#+begin_src emacs-lisp +(setq org-journal-dir "~/nc/Org/journal/" + org-journal-date-prefix "* " + org-journal-time-prefix "** " + org-journal-date-format "%B %d, %Y (%A) " + org-journal-file-format "%Y-%m-%d.org") +#+end_src + +** Org-publish +#+begin_src emacs-lisp +(setq org-publish-use-timestamps-flag nil) +(setq org-export-with-broken-links t) +#+end_src + +** Org-auto-tangle +=org-auto-tangle= allows you to add the option =#+auto_tangle: t= in your Org file so that it automatically tangles when you save the document. + +#+begin_src emacs-lisp +(use-package! org-auto-tangle + :defer t + :hook (org-mode . org-auto-tangle-mode) + :config + (setq org-auto-tangle-default t)) + +#+end_src + +* Perspective +Perspective provides multiple named workspaces (or "perspectives") in Emacs, +similar to having multiple desktops in window managers like Awesome and XMonad. +Each perspective has its own buffer list and its own window layout, making it +easy to work on many separate projects without getting lost in all the buffers. +Switching to a perspective activates its window configuration, and when in a +perspective, only its buffers are available (by default). Doom Emacs uses 'SPC +some_key' for binding some of the perspective commands, so I used this binging +format for the perspective bindings that I created.. + +| COMMAND | DESCRIPTION | KEYBINDING | +|----------------------------+-------------------------------------+------------| +| persp-switch | Switch to perspective NAME | SPC DEL | +| persp-switch-to-buffer | Switch to buffer in perspective | SPC , | +| persp-next | Switch to next perspective | SPC ] | +| persp-prev | Switch to previous perspective | SPC [ | +| persp-add-buffer | Add a buffer to current perspective | SPC + | +| persp-remove-by-name | Remove perspective by name | SPC - | +| +workspace/switch-to-{0-9} | Switch to workspace /n/ | SPC 0-9 | + +#+begin_src emacs-lisp +(map! :leader + :desc "Switch to perspective NAME" "DEL" #'persp-switch + :desc "Switch to buffer in perspective" "," #'persp-switch-to-buffer + :desc "Switch to next perspective" "]" #'persp-next + :desc "Switch to previous perspective" "[" #'persp-prev + :desc "Add a buffer current perspective" "+" #'persp-add-buffer + :desc "Remove perspective by name" "-" #'persp-remove-by-name) +#+end_src + +* Rainbow mode +Rainbox mode displays the actual color for any hex value color. It's such a +nice feature that I wanted it turned on all the time, regardless of what mode I +am in. The following creates a global minor mode for rainbow-mode and enables +it. + +#+begin_src emacs-lisp +(define-globalized-minor-mode global-rainbow-mode rainbow-mode + (lambda () (rainbow-mode 1))) +(global-rainbow-mode 1 ) +#+end_src + +* Registers +Emacs registers are compartments where you can save text, rectangles and +positions for later use. Once you save text or a rectangle in a register, you +can copy it into the buffer once or many times; once you save a position in a +register, you can jump back to that position once or many times. The default +GNU Emacs keybindings for these commands (with the exception of +counsel-register) involves 'C-x r' followed by one or more other keys. I wanted +to make this a little more user friendly, and since I am using Doom Emacs, I +choose to replace the 'C-x r' part of the key chords with 'SPC r'. + +| COMMAND | DESCRIPTION | KEYBINDING | +|----------------------------------+----------------------------------+------------| +| copy-to-register | /Copy to register/ | SPC r c | +| frameset-to-register | /Frameset to register/ | SPC r f | +| insert-register | /Insert contents of register/ | SPC r i | +| jump-to-register | /Jump to register/ | SPC r j | +| list-registers | /List registers/ | SPC r l | +| number-to-register | /Number to register/ | SPC r n | +| counsel-register | /Interactively choose a register/ | SPC r r | +| view-register | /View a register/ | SPC r v | +| window-configuration-to-register | /Window configuration to register/ | SPC r w | +| increment-register | /Increment register/ | SPC r + | +| point-to-register | /Point to register/ | SPC r SPC | + +#+BEGIN_SRC emacs-lisp +(map! :leader + (:prefix ("r" . "registers") + :desc "Copy to register" "c" #'copy-to-register + :desc "Frameset to register" "f" #'frameset-to-register + :desc "Insert contents of register" "i" #'insert-register + :desc "Jump to register" "j" #'jump-to-register + :desc "List registers" "l" #'list-registers + :desc "Number to register" "n" #'number-to-register + :desc "Interactively choose a register" "r" #'counsel-register + :desc "View a register" "v" #'view-register + :desc "Window configuration to register" "w" #'window-configuration-to-register + :desc "Increment register" "+" #'increment-register + :desc "Point to register" "SPC" #'point-to-register)) +#+END_SRC + +* Shells +Settings for the various shells and terminal emulators within Emacs. ++ 'shell-file-name' -- sets the shell to be used in M-x shell, M-x term, M-x + ansi-term and M-x vterm. ++ 'eshell-aliases-file' -- sets an aliases file for the eshell. + +#+BEGIN_SRC emacs-lisp +(setq shell-file-name "/bin/bash" + vterm-max-scrollback 5000) +(setq eshell-rc-script "~/.config/doom/eshell/profile" + eshell-aliases-file "~/.config/doom/eshell/aliases" + eshell-history-size 5000 + eshell-buffer-maximum-lines 5000 + eshell-hist-ignoredups t + eshell-scroll-to-bottom-on-input t + eshell-destroy-buffer-when-process-dies t + eshell-visual-commands'("bash" "fish" "htop" "ssh" "top" "zsh")) +(map! :leader + :desc "Eshell" "e s" #'eshell + :desc "Eshell popup toggle" "e t" #'+eshell/toggle + :desc "Counsel eshell history" "e h" #'counsel-esh-history + :desc "Vterm popup toggle" "v t" #'+vterm/toggle) +#+END_SRC + +* Splits +I set splits to default to opening on the right using 'prefer-horizontal-split'. +I set a keybinding for 'clone-indirect-buffer-other-window' for when I want to +have the same document in two splits. The text of the indirect buffer is always +identical to the text of its base buffer; changes made by editing either one are +visible immediately in the other. But in all other respects, the indirect +buffer and its base buffer are completely separate. For example, I can fold one +split but other will be unfolded. + +#+BEGIN_SRC emacs-lisp +(defun prefer-horizontal-split () + (set-variable 'split-height-threshold nil t) + (set-variable 'split-width-threshold 40 t)) ; make this as low as needed +(add-hook 'markdown-mode-hook 'prefer-horizontal-split) +(map! :leader + :desc "Clone indirect buffer other window" "b c" #'clone-indirect-buffer-other-window) +#+END_SRC + +* Winner mode +Winner mode has been included with GNU Emacs since version 20. This is a global +minor mode and, when activated, it allows you to “undo” (and “redo”) changes in +the window configuration with the key commands 'SCP w ' and 'SPC w +'. + +#+BEGIN_SRC emacs-lisp +(map! :leader + (:prefix ("w" . "window") + :desc "Winner redo" "" #'winner-redo + :desc "Winner undo" "" #'winner-undo)) +#+END_SRC + +* Zap to char +Emacs provides a 'zap-to-char' command that kills from the current point to a +character. It is bound to 'M-z' in standard GNU Emacs but since Doom Emacs uses +'SPC' as its leader key and does not have 'SPC z' binded to anything, it just +makes since to use it for 'zap-to-char'. Note that 'zap-to-char' can be used +with the universal argument 'SPC u' to modify its behavior. Examples of +'zap-to-char' usage are listed in the table below: + +| KEYBINDING | WHAT IS DOES | +|---------------------------+------------------------------------------------------------| +| SPC z e | deletes all chars to the next occurrence of 'e' | +| SPC u 2 SPC z e | deletes all chars to the second occurrence of 'e' | +| SPC u - SPC z e | deletes all chars to the previous occurrence of 'e' | +| SPC u -2 SPC z e | deletes all chars to the fourth previous occurrence of 'e' | +| SPC u 1 0 0 SPC u SPC z e | deletes all chars to the 100th occurrence of 'e' | + +=TIP:= The universal argument (SPC u) can only take a single integer by default. +If you need to use a multi-digit number (like 100 in the last example in the +table above), then you must terminate the universal argument with another 'SPC +u' after typing the number. + +'zap-up-to-char' is an alternative command that does not zap the char specified. +It is binded to 'SPC Z'. It can also be used in conjunction with the universal +argument 'SPC u' in similar fashion to the the 'zap-to-char' examples above. + +=NOTE:= Vim (evil mode) has similar functionality builtin. You can delete to +the next occurrence of 'e' by using 'dte' in normal. To delete to the next +occurrence of 'e' including the 'e', then you would use 'dfe'. And you can +modify 'dt' and 'df' by prefixing them with numbers, so '2dte' would delete to +the second occurrence of 'e'. + +#+BEGIN_SRC emacs-lisp +(map! :leader + :desc "Zap to char" "z" #'zap-to-char + :desc "Zap up to char" "Z" #'zap-up-to-char) +#+END_SRC + +* Transparency +#+BEGIN_SRC emacs-lisp +(set-frame-parameter (selected-frame) 'alpha '(98 . 80)) +(add-to-list 'default-frame-alist '(alpha . (98 . 80))) +#+END_SRC + +* Autostart lsp +#+BEGIN_SRC emacs-lisp +(add-hook 'prog-mode-hook #'lsp) +#+END_SRC diff --git a/user/.config/doom/emacs-dash.txt b/user/.config/doom/emacs-dash.txt new file mode 100644 index 000000000..5d5f70293 --- /dev/null +++ b/user/.config/doom/emacs-dash.txt @@ -0,0 +1,19 @@ + ================= =============== =============== ======== ======== + \\ . . . . . . .\\ //. . . . . . .\\ //. . . . . . .\\ \\. . .\\// . . // + ||. . ._____. . .|| ||. . ._____. . .|| ||. . ._____. . .|| || . . .\/ . . .|| + || . .|| ||. . || || . .|| ||. . || || . .|| ||. . || ||. . . . . . . || + ||. . || || . .|| ||. . || || . .|| ||. . || || . .|| || . | . . . . .|| + || . .|| ||. _-|| ||-_ .|| ||. . || || . .|| ||. _-|| ||-_.|\ . . . . || + ||. . || ||-' || || `-|| || . .|| ||. . || ||-' || || `|\_ . .|. .|| + || . _|| || || || || ||_ . || || . _|| || || || |\ `-_/| . || + ||_-' || .|/ || || \|. || `-_|| ||_-' || .|/ || || | \ / |-_.|| + || ||_-' || || `-_|| || || ||_-' || || | \ / | `|| + || `' || || `' || || `' || || | \ / | || + || .===' `===. .==='.`===. .===' /==. | \/ | || + || .==' \_|-_ `===. .===' _|_ `===. .===' _-|/ `== \/ | || + || .==' _-' `-_ `=' _-' `-_ `=' _-' `-_ /| \/ | || + || .==' _-' '-__\._-' '-_./__-' `' |. /| | || + ||.==' _-' `' | /==.|| + ==' _-' EMACS \/ `== + \ _-' `-_ / + `'' ``' diff --git a/user/.config/doom/eshell/aliases b/user/.config/doom/eshell/aliases new file mode 100644 index 000000000..ef5aa3a9e --- /dev/null +++ b/user/.config/doom/eshell/aliases @@ -0,0 +1,26 @@ +# Aliases for emacs commands +alias ff find-file $1 + +# Changing "ls" to "exa" +alias ls exa -al --color=always --group-directories-first $* # my preferred listing +alias la exa -a --color=always --group-directories-first $* # all files and dirs +alias ll exa -l --color=always --group-directories-first $* # long format +alias lt exa -aT --color=always --group-directories-first $* # tree listing +alias l. exa -a1 $* | grep "^\." # list hidden files + +# Merge Xresources +alias merge xrdb -merge ~/.Xresources + +# Aliases for doom emacs utilties +alias doomsync ~/.emacs.d/bin/doom sync +alias doomdoctor ~/.emacs.d/bin/doom doctor +alias doomupgrade ~/.emacs.d/bin/doom upgrade +alias doompurge ~/.emacs.d/bin/doom purge + +# Confirm before overwriting something +alias cp cp -i $1 +alias mv mv -i $1 +alias rm rm -i $1 + +# bare git repo alias for dotfiles +alias config /usr/bin/git --git-dir=$HOME/dotfiles --work-tree=$HOME $* diff --git a/user/.config/doom/eshell/profile b/user/.config/doom/eshell/profile new file mode 100644 index 000000000..3c871d69c --- /dev/null +++ b/user/.config/doom/eshell/profile @@ -0,0 +1 @@ +colorscript random \ No newline at end of file diff --git a/user/.config/doom/init.el b/user/.config/doom/init.el new file mode 100644 index 000000000..07422364e --- /dev/null +++ b/user/.config/doom/init.el @@ -0,0 +1,191 @@ +;;; init.el -*- lexical-binding: t; -*- + +;; This file controls what Doom modules are enabled and what order they load +;; in. Remember to run 'doom sync' after modifying it! + +;; NOTE Press 'SPC h d h' (or 'C-h d h' for non-vim users) to access Doom's +;; documentation. There you'll find a "Module Index" link where you'll find +;; a comprehensive list of Doom's modules and what flags they support. + +;; NOTE Move your cursor over a module's name (or its flags) and press 'K' (or +;; 'C-c c k' for non-vim users) to view its documentation. This works on +;; flags as well (those symbols that start with a plus). +;; +;; Alternatively, press 'gd' (or 'C-c c d') on a module to browse its +;; directory (for easy access to its source code). + +(doom! :input + ;;chinese + ;;japanese + ;;layout ; auie,ctsrnm is the superior home row + + :completion + company ; the ultimate code completion backend + ;;helm ; the *other* search engine for love and life + ;;ido ; the other *other* search engine... + (ivy +fonts +childframe) ; a search engine for love and life + + :ui + ;;deft ; notational velocity for Emacs + doom ; what makes DOOM look the way it does + ;;doom-dashboard ; a nifty splash screen for Emacs + doom-quit ; DOOM quit-message prompts when you quit Emacs + (emoji +unicode) ; 🙂 + ;;fill-column ; a `fill-column' indicator + hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW + ;;hydra + ;;indent-guides ; highlighted indent columns + (ligatures +extras) ; ligatures and symbols to make your code pretty again + ;;minimap ; show a map of the code on the side + modeline ; snazzy, Atom-inspired modeline, plus API + ;;nav-flash ; blink cursor line after big motions + neotree ; a project drawer, like NERDTree for vim + ophints ; highlight the region an operation acts on + (popup +defaults) ; tame sudden yet inevitable temporary windows + ;;tabs ; a tab bar for Emacs + ;;treemacs ; a project drawer, like neotree but cooler + ;;unicode ; extended unicode support for various languages + vc-gutter ; vcs diff in the fringe + vi-tilde-fringe ; fringe tildes to mark beyond EOB + window-select ; visually switch windows + workspaces ; tab emulation, persistence & separate workspaces + zen ; distraction-free coding or writing + + :editor + (evil +everywhere) ; come to the dark side, we have cookies + file-templates ; auto-snippets for empty files + fold ; (nigh) universal code folding + ;;(format +onsave) ; automated prettiness + ;;god ; run Emacs commands without modifier keys + lispy ; vim for lisp, for people who don't like vim + ;;multiple-cursors ; editing in many places at once + ;;objed ; text object editing for the innocent + ;;parinfer ; turn lisp into python, sort of + ;;rotate-text ; cycle region at point between text candidates + snippets ; my elves. They type so I don't have to + ;;word-wrap ; soft wrapping with language-aware indent + + :emacs + (dired +icons) ; making dired pretty [functional] + electric ; smarter, keyword-based electric-indent + (ibuffer +icons) ; interactive buffer management + undo ; persistent, smarter undo for your inevitable mistakes + vc ; version-control and Emacs, sitting in a tree + + :term + eshell ; the elisp shell that works everywhere + shell ; simple shell REPL for Emacs + ;;term ; basic terminal emulator for Emacs + vterm ; the best terminal emulation in Emacs + + :checkers + syntax ; tasing you for every semicolon you forget + ;;(spell +aspell) ; tasing you for misspelling mispelling + ;;grammar ; tasing grammar mistake every you make + + :tools + ;;ansible + ;;debugger ; FIXME stepping through code, to help you add bugs + ;;direnv + ;;docker + ;;editorconfig ; let someone else argue about tabs vs spaces + ;;ein ; tame Jupyter notebooks with emacs + (eval +overlay) ; run code, run (also, repls) + ;;gist ; interacting with github gists + lookup ; navigate your code and its documentation + lsp + magit ; a git porcelain for Emacs + ;;make ; run make tasks from Emacs + ;;pass ; password manager for nerds + pdf ; pdf enhancements + ;;prodigy ; FIXME managing external services & code builders + ;;rgb ; creating color strings + ;;taskrunner ; taskrunner for all your projects + ;;terraform ; infrastructure as code + ;;tmux ; an API for interacting with tmux + ;;upload ; map local to remote projects via ssh/ftp + + :os + (:if IS-MAC macos) ; improve compatibility with macOS + ;;tty ; improve the terminal Emacs experience + + :lang + ;;agda ; types of types of types of types... + cc ; C/C++/Obj-C madness + ;;clojure ; java with a lisp + common-lisp ; if you've seen one lisp, you've seen them all + ;;coq ; proofs-as-programs + ;;crystal ; ruby at the speed of c + csharp ; unity, .NET, and mono shenanigans + ;;data ; config/data formats + ;;(dart +flutter) ; paint ui and not much else + ;;elixir ; erlang done right + ;;elm ; care for a cup of TEA? + emacs-lisp ; drown in parentheses + ;;erlang ; an elegant language for a more civilized age + ;;ess ; emacs speaks statistics + ;;faust ; dsp, but you get to keep your soul + ;;fsharp ; ML stands for Microsoft's Language + ;;fstar ; (dependent) types and (monadic) effects and Z3 + ;;gdscript ; the language you waited for + ;;(go +lsp) ; the hipster dialect + ;;(haskell +dante) ; a language that's lazier than I am + ;;hy ; readability of scheme w/ speed of python + ;;idris ; a language you can depend on + json ; At least it ain't XML + ;;(java +meghanada) ; the poster child for carpal tunnel syndrome + javascript ; all(hope(abandon(ye(who(enter(here)))))) + ;;julia ; a better, faster MATLAB + ;;kotlin ; a better, slicker Java(Script) + latex ; writing papers in Emacs has never been so fun + ;;lean + ;;factor + ;;ledger ; an accounting system in Emacs + lua ; one-based indices? one-based indices + markdown ; writing docs for people to ignore + ;;nim ; python + lisp at the speed of c + ;;nix ; I hereby declare "nix geht mehr!" + ;;ocaml ; an objective camel + (org + +journal ; enable org journal + +pretty ; replace asterisks with pretty org bullets + +publish ; create static websites with org + +roam2) ; org roam v2 + php ; perl's insecure younger brother + ;;plantuml ; diagrams for confusing people more + ;;purescript ; javascript, but functional + python ; beautiful is better than ugly + ;;qt ; the 'cutest' gui framework ever + ;;racket ; a DSL for DSLs + ;;raku ; the artist formerly known as perl6 + ;;rest ; Emacs as a REST client + ;;rst ; ReST in peace + ;;(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"} + ;;rust ; Fe2O3.unwrap().unwrap().unwrap().unwrap() + ;;scala ; java, but good + scheme ; a fully conniving family of lisps + sh ; she sells {ba,z,fi}sh shells on the C xor + ;;sml + ;;solidity ; do you need a blockchain? No. + ;;swift ; who asked for emoji variables? + ;;terra ; Earth and Moon in alignment for performance. + web ; the tubes + yaml ; JSON, but readable + + :email + ;;mu4e + ;;smtpmail + ;;notmuch + ;;(wanderlust +gmail) + + :app + ;;calendar + ;; emms + ;;everywhere ; *leave* Emacs!? You must be joking + ;;irc ; how neckbeards socialize + ;;rss ; emacs as an RSS reader + ;;twitter ; twitter client https://twitter.com/vnought + + :config + literate + (default +bindings +smartparens)) diff --git a/user/.config/doom/packages.el b/user/.config/doom/packages.el new file mode 100644 index 000000000..791d18aa3 --- /dev/null +++ b/user/.config/doom/packages.el @@ -0,0 +1,90 @@ +;; -*- no-byte-compile: t; -*- +;;; $DOOMDIR/packages.el + +;; To install a package with Doom you must declare them here and run 'doom sync' +;; on the command line, then restart Emacs for the changes to take effect -- or +;; use 'M-x doom/reload'. + + +;; To install SOME-PACKAGE from MELPA, ELPA or emacsmirror: +;(package! some-package) + +;; To install a package directly from a remote git repo, you must specify a +;; `:recipe'. You'll find documentation on what `:recipe' accepts here: +;; https://github.com/raxod502/straight.el#the-recipe-format +;(package! another-package +; :recipe (:host github :repo "username/repo")) + +;; If the package you are trying to install does not contain a PACKAGENAME.el +;; file, or is located in a subdirectory of the repo, you'll need to specify +;; `:files' in the `:recipe': +;(package! this-package +; :recipe (:host github :repo "username/repo" +; :files ("some-file.el" "src/lisp/*.el"))) + +;; If you'd like to disable a package included with Doom, you can do so here +;; with the `:disable' property: +;(package! builtin-package :disable t) + +;; You can override the recipe of a built in package without having to specify +;; all the properties for `:recipe'. These will inherit the rest of its recipe +;; from Doom or MELPA/ELPA/Emacsmirror: +;(package! builtin-package :recipe (:nonrecursive t)) +;(package! builtin-package-2 :recipe (:repo "myfork/package")) + +;; Specify a `:branch' to install a package from a particular branch or tag. +;; This is required for some packages whose default branch isn't 'master' (which +;; our package manager can't deal with; see raxod502/straight.el#279) +;(package! builtin-package :recipe (:branch "develop")) + +;; Use `:pin' to specify a particular commit to install. +;(package! builtin-package :pin "1a2b3c4d5e") + + +;; Doom's packages are pinned to a specific commit and updated from release to +;; release. The `unpin!' macro allows you to unpin single packages... +;(unpin! pinned-package) +;; ...or multiple packages +;(unpin! pinned-package another-pinned-package) +;; ...Or *all* packages (NOT RECOMMENDED; will likely break things) +;(unpin! t) + +(package! gitconfig-mode + :recipe (:host github :repo "magit/git-modes" + :files ("gitconfig-mode.el"))) +(package! gitignore-mode + :recipe (:host github :repo "magit/git-modes" + :files ("gitignore-mode.el"))) +(package! flycheck-aspell) +(package! async) +(package! calfw) +(package! calfw-org) +(package! dashboard) +(package! dired-open) +(package! dired-subtree) +(package! dmenu) +(package! elpher) +(package! emojify) +(package! esxml) +(package! evil-tutor) +(package! imenu-list) +(package! ivy-posframe) +(package! mw-thesaurus) +(package! org-board) +(package! org-web-tools) +(package! org-auto-tangle) +(package! ox-gemini) +(package! pacmacs) +(package! peep-dired) +(package! rainbow-mode) +(package! request) +(package! resize-window) +(package! s) +(package! tldr) +(package! wc-mode) +(package! beacon) +(package! minimap) +(package! olivetti) +(package! sharper) +(package! csproj-mode) +(package! dap-mode) diff --git a/user/.config/lvim/config.lua b/user/.config/lvim/config.lua deleted file mode 100644 index e5bb3e087..000000000 --- a/user/.config/lvim/config.lua +++ /dev/null @@ -1,44 +0,0 @@ --- nvim options -vim.opt.shiftwidth = 2 -vim.opt.tabstop = 2 -vim.opt.relativenumber = true -vim.cmd('autocmd FileType markdown setlocal nospell') -vim.opt.wrap = true -- wrap lines -vim.opt.spell = false -vim.o.shell = '/usr/bin/bash' - --- general -lvim.use_icons = false -lvim.log.level = "info" -lvim.format_on_save = { - enabled = true, - pattern = "*.lua", - timeout = 1000, -} - --- change theme settings -lvim.colorscheme = "gruvbox" -lvim.transparent_window = true -lvim.builtin.alpha.active = true -lvim.builtin.alpha.mode = "dashboard" -lvim.builtin.terminal.active = true -lvim.builtin.nvimtree.setup.view.side = "left" -lvim.builtin.nvimtree.setup.renderer.icons.show.git = false - --- automatically install missing parsers when entering buffer -lvim.builtin.treesitter.auto_install = true - --- additional Plugins -lvim.plugins = { - { "lunarvim/colorschemes" }, - { "ellisonleao/gruvbox.nvim" }, - { "puremourning/vimspector" }, - { "OmniSharp/omnisharp-vim" }, - { "SirVer/ultisnips" }, -} - --- vimspector options -vim.g.vimspector_enable_mappings = 'HUMAN' -vim.g.vimspector_enable_mappings_for_mode = { - [''] = { 'n', 'v' }, -} diff --git a/user/.config/musikcube/hotkeys.json b/user/.config/musikcube/hotkeys.json deleted file mode 100644 index 914c527c6..000000000 --- a/user/.config/musikcube/hotkeys.json +++ /dev/null @@ -1,68 +0,0 @@ -{ - "browse_category_filter": "^F", - "browse_playlists_delete": "KEY_DC", - "browse_playlists_new": "M-n", - "browse_playlists_rename": "M-r", - "browse_playlists_save": "M-s", - "context_menu": "M-enter", - "hotkeys_backup": "M-b", - "hotkeys_reset_to_default": "M-r", - "key_down": "j", - "key_end": "KEY_END", - "key_home": "KEY_HOME", - "key_left": "h", - "key_page_down": "KEY_NPAGE", - "key_page_up": "KEY_PPAGE", - "key_right": "l", - "key_up": "k", - "lyrics_retry": "r", - "metadata_rescan": "^R", - "navigate_console": "`", - "navigate_hotkeys": "?", - "navigate_jump_to_playing": "x", - "navigate_library": "a", - "navigate_library_album_artists": "4", - "navigate_library_browse": "b", - "navigate_library_browse_albums": "2", - "navigate_library_browse_artists": "1", - "navigate_library_browse_directories": "d", - "navigate_library_browse_genres": "3", - "navigate_library_choose_category": "6", - "navigate_library_filter": "f", - "navigate_library_play_queue": "n", - "navigate_library_playlists": "5", - "navigate_library_tracks": "t", - "navigate_lyrics": "^L", - "navigate_settings": "s", - "play_queue_clear": "X", - "play_queue_delete": "KEY_DC", - "play_queue_hot_swap": "M-a", - "play_queue_move_down": "M-down", - "play_queue_move_up": "M-up", - "play_queue_playlist_delete": "M-x", - "play_queue_playlist_load": "M-l", - "play_queue_playlist_rename": "M-r", - "play_queue_playlist_save": "M-s", - "playback_next": "M-l", - "playback_previous": "M-j", - "playback_seek_back": "u", - "playback_seek_back_proportional": "y", - "playback_seek_forward": "o", - "playback_seek_forward_proportional": "p", - "playback_stop": "^X", - "playback_toggle_mute": "m", - "playback_toggle_pause": "^P", - "playback_toggle_repeat": ".", - "playback_toggle_shuffle": ",", - "playback_volume_down": "M-k", - "playback_volume_up": "M-i", - "search_input_toggle_match_type": "M-m", - "show_equalizer": "^E", - "toggle_visualizer": "v", - "track_list_change_sort_order": "M-s", - "track_list_next_group": "]", - "track_list_play_from_top": "M-P", - "track_list_previous_group": "[", - "track_list_rate_track": "r", - "view_refresh": "KEY_F(5)" -} \ No newline at end of file diff --git a/user/.config/suckless/dwm/config.h b/user/.config/suckless/dwm/config.h index 5db09c76a..16543a1ed 100644 --- a/user/.config/suckless/dwm/config.h +++ b/user/.config/suckless/dwm/config.h @@ -37,7 +37,7 @@ const char *spcmd4[] = {"st", "-n", "spani", "-g", "140x35", "-e", "ani-cli", NU const char *spcmd5[] = {"st", "-n", "spytf", "-g", "140x35", "-e", "ytfzf", "-flst", NULL }; const char *spcmd6[] = {"st", "-n", "spamx", "-g", "140x35", "-e", "alsamixer", NULL }; const char *spcmd7[] = {"st", "-n", "sppmx", "-g", "140x35", "-e", "pulsemixer", NULL }; -const char *spcmd8[] = {"st", "-n", "spmsc", "-g", "140x35", "-e", "musikcube", NULL }; +const char *spcmd8[] = {"st", "-n", "spmsc", "-g", "140x35", "-e", "cmus", NULL }; const char *spcmd9[] = {"st", "-n", "spflm", "-g", "140x35", "-e", ".config/vifm/scripts/vifmrun", NULL }; const char *spcmd10[] = {"st", "-n", "spytm", "-g", "140x35", "-e", "ytfzf", "-mlst", NULL }; const char *spcmd11[] = {"st", "-n", "sprss", "-g", "140x35", "-e", "newsboat", NULL }; @@ -190,11 +190,11 @@ static const Key keys[] = { // terminal { MODKEY, XK_Return, spawn, {.v = termcmd } }, // text editor - { MODKEY, XK_e, spawn, SHCMD("st -n neovim -c neovim -e $HOME/.local/bin/lvim")}, + { MODKEY, XK_e, spawn, SHCMD("emacsclient -c -a 'emacs'")}, // web browser - { MODKEY, XK_w, spawn, SHCMD("brave")}, + { MODKEY, XK_w, spawn, SHCMD("firefox")}, // chat - { MODKEY, XK_s, spawn, SHCMD("flatpak run org.signal.Signal")}, + { MODKEY, XK_s, spawn, SHCMD("org.signal.Signal")}, /* keyboard layout */ // set keyboard layout to es