From a106228d98b954d4e584458bba50c46ac2d8e2c7 Mon Sep 17 00:00:00 2001 From: Grant Horner Date: Wed, 2 Sep 2026 05:01:07 -0400 Subject: [PATCH] add a bunch of niceties from the newcomers presets --- init.el | 73 +++++++++++++++++++++++++++++++++++++-------------------- 1 file changed, 47 insertions(+), 26 deletions(-) diff --git a/init.el b/init.el index e3bccf6..6242f77 100644 --- a/init.el +++ b/init.el @@ -9,9 +9,14 @@ (load-theme 'deeper-blue) +(defun hgh/emacs-directory (path) + (concat user-emacs-directory path)) + +(load-file (hgh/emacs-directory "utils.el")) + (when (string= system-type "darwin") - (setq manual-program "gman") - (setq dired-use-ls-dired nil) + (setq-default manual-program "gman") + (setq-default dired-use-ls-dired nil) (setq mac-command-modifier 'control)) (keymap-global-set "M-o" #'other-window) @@ -35,16 +40,11 @@ (grep-apply-setting 'grep-command "rg --no-heading") (grep-apply-setting 'grep-find-command nil) -(defun hgh/emacs-directory (path) - (concat user-emacs-directory path)) - (setq org-default-notes-file "~/inbox.org" org-todo-keywords '((sequence "TODO" "INPROGRESS" "DONE")) custom-file (hgh/emacs-directory "custom.el") make-backup-files nil - dired-dwim-target t - manual-program "gman" speedbar-window-default-width 25 speedbar-window-max-width 25 duplicate-line-final-position -1 @@ -52,7 +52,8 @@ competions-detailed t auth-sources '("~/.authinfo") tab-bar-show 1 - ring-bell-function 'ignore) + ring-bell-function 'ignore + pixel-scroll-mode t) (require 'project) (setq project-switch-commands '((project-find-file "Find file" "f") @@ -68,25 +69,37 @@ (add-to-list 'load-path work-dir) (load-file (expand-file-name "work.el" work-dir)))) -(load-file (hgh/emacs-directory "utils.el")) + (setopt use-short-answers t use-dialog-box nil use-package-enable-imenu-support t display-line-numbers-type 'relative - completion-styles '(basic)) + completion-styles '(basic) + save-interprogram-paste-before-kill t + imenu-auto-rescan t + column-number-mode t + frame-resize-pixelwise t + window-resize-pixelwise t + mode-line-compact 'long + savehist-mode t + minibuffer-visible-completions t + completions-detailed t + completions-group t + completion-eager-update t + shell-command-prompt-show-cwd t -(electric-pair-mode 1) -(fido-mode 1) -(global-completion-preview-mode 1) -(tab-bar-mode -1) -(tool-bar-mode -1) -(scroll-bar-mode -1) -(global-hl-line-mode 1) -(global-eldoc-mode 1) -(global-display-line-numbers-mode 1) -(global-auto-revert-mode 1) + electric-pair-mode t + fido-mode t + global-completion-preview-mode t + tab-bar-mode nil + tool-bar-mode nil + scroll-bar-mode nil + global-hl-line-mode t + global-eldoc-mode t + global-display-line-numbers-mode t + global-auto-revert-mode t) (defun hgh/untabify-buffer () (interactive) @@ -131,6 +144,13 @@ (exec-path-from-shell-initialize) +(use-package dired + :ensure nil + :custom + (dired-dwim-target t) + (dired-auto-revert-buffer t) + (dired-mouse-drag-files t)) + (use-package diminish :demand t :config @@ -247,15 +267,15 @@ dumber-jump-find-rules) (push '(:language "jai" :type "variable" - :supports ("ag" "grep" "rg" "git-grep") - :regex "\\bJJJ\\s*(:|:\\s*=|::)" - :tests ("test: Type" "test : Type = Val" "test :: Val")) + :supports ("ag" "grep" "rg" "git-grep") + :regex "\\bJJJ\\s*(:|:\\s*=|::)" + :tests ("test: Type" "test : Type = Val" "test :: Val")) dumber-jump-find-rules) (push '(:language "jai" :type "type" - :supports ("ag" "grep" "rg" "git-grep") - :regex "\\bJJJ\\s*::" - :tests ("test ::")) + :supports ("ag" "grep" "rg" "git-grep") + :regex "\\bJJJ\\s*::" + :tests ("test ::")) dumber-jump-find-rules)) (use-package eglot @@ -300,6 +320,7 @@ (use-package dart-mode) (use-package flymake + :hook (prog-mode) :custom (flymake-wrap-around t))