From c2098fcdc9402366e92804bf2128007487115553 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Thu, 2 Dec 2021 00:18:11 -0600 Subject: Change defaults --- lisp/+defaults.el | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) diff --git a/lisp/+defaults.el b/lisp/+defaults.el index ee49480..d439d82 100644 --- a/lisp/+defaults.el +++ b/lisp/+defaults.el @@ -68,23 +68,23 @@ Do this only if the buffer is not visiting a file." kill-do-not-save-duplicates t kill-read-only-ok t kill-ring-max 500 + kill-whole-line t kmacro-ring-max 20 load-prefer-newer t major-mode '+set-major-mode-from-buffer-name mark-ring-max 50 minibuffer-eldef-shorten-default t - minibuffer-prompt-properties '(read-only t - cursor-intangible t - face minibuffer-prompt) + minibuffer-prompt-properties (list 'read-only t + 'cursor-intangible t + 'face 'minibuffer-prompt) mode-require-final-newline 'visit-save mouse-drag-copy-region t mouse-yank-at-point t native-comp-async-report-warnings-errors 'silent read-answer-short t read-buffer-completion-ignore-case t - read-extended-command-predicate (when - (fboundp - 'command-completion-default-include-p) + read-extended-command-predicate (when (fboundp + 'command-completion-default-include-p) 'command-completion-default-include-p) recenter-positions '(top middle bottom) regexp-search-ring-max 100 @@ -183,6 +183,10 @@ Do this only if the buffer is not visiting a file." (global-set-key (kbd "C-M-s") 'isearch-forward) (global-set-key (kbd "C-M-r") 'isearch-backward) +;; C-h deletes backward - see https://idiomdrottning.org/bad-emacs-defaults +(global-set-key (kbd "C-h") 'delete-backward-char) +(keyboard-translate ?\C-h ?\C-?) + ;;; Required libraries (when (require 'uniquify nil :noerror) -- cgit 1.4.1-21-gabe81