.emacs-my
changeset 1536 5854fc2dbece
parent 1534 a20f8f4abec7
child 1537 592689d6d222
equal deleted inserted replaced
1535:15388800a8e2 1536:5854fc2dbece
  1082   (other-window -1))
  1082   (other-window -1))
  1083 (global-set-key [?\C-x up] #'my--backward-other-window)
  1083 (global-set-key [?\C-x up] #'my--backward-other-window)
  1084 (global-set-key [?\C-x down] #'other-window)
  1084 (global-set-key [?\C-x down] #'other-window)
  1085 (global-set-key [s-up] #'my--backward-other-window)
  1085 (global-set-key [s-up] #'my--backward-other-window)
  1086 (global-set-key [s-down] #'other-window)
  1086 (global-set-key [s-down] #'other-window)
       
  1087 (defun my--erase-buffer ()
       
  1088   (interactive)
       
  1089   (erase-buffer)
       
  1090   (when (buffer-file-name)
       
  1091     (basic-save-buffer)))
       
  1092 (global-set-key [s-backspace] #'my--erase-buffer)
  1087 
  1093 
  1088 (require 'uniquify)
  1094 (require 'uniquify)
  1089 (setq uniquify-buffer-name-style 'post-forward)
  1095 (setq uniquify-buffer-name-style 'post-forward)
  1090 (setq uniquify-separator "|")
  1096 (setq uniquify-separator "|")
  1091 (setq uniquify-after-kill-buffer-p t)
  1097 (setq uniquify-after-kill-buffer-p t)