Change defaults

1 files changed, 10 insertions, 6 deletions

@@ -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)