emacs hotkeys for 28

hotkeys-for-28.el

(progn
  (define-key key-translation-map [?\C-h] [?\C-?])
  (define-key key-translation-map [?\M-h] [?\M-\d])
  ;; (define-key key-translation-map (kbd "C-M-h") (kbd "C-S-<backspace>"))
  ;;(keymap-global-set "C-h" #'backward-delete-char)
  ;;(keymap-global-set "M-h" #'backward-kill-word)
  (global-set-key (kbd "M-o") #'other-window)
  (global-set-key (kbd "M-H") #'mark-paragraph)
  (global-set-key (kbd "C-M-S-h") #'mark-defun)
  (global-set-key (kbd "C-M-h") #'kill-whole-line) 
  (global-set-key (kbd "C-\\") #'undo)
  (global-set-key (kbd "C-/") #'undo-redo)
  (global-set-key (kbd "M-p") #'scroll-down-line)
  (global-set-key (kbd "M-n") #'scroll-up-line))