.emacs-my
changeset 1094 5cff783d79a3
parent 1093 d79cf68c97e2
child 1095 c71fb6dedc38
equal deleted inserted replaced
1093:d79cf68c97e2 1094:5cff783d79a3
   740 (global-set-key [delete]     'delete-char)
   740 (global-set-key [delete]     'delete-char)
   741 ;; (global-set-key [backspace]  'backward-delete-char-untabify) ; not work properly in *info* mode
   741 ;; (global-set-key [backspace]  'backward-delete-char-untabify) ; not work properly in *info* mode
   742 
   742 
   743 (global-set-key [f2]    'save-buffer)
   743 (global-set-key [f2]    'save-buffer)
   744 (global-set-key [S-f6]  'rename-buffer)
   744 (global-set-key [S-f6]  'rename-buffer)
   745 (global-set-key (kbd "C-x C-k") 'kill-this-buffer)
       
   746 (global-set-key [M-f4]  'save-buffers-kill-emacs)
   745 (global-set-key [M-f4]  'save-buffers-kill-emacs)
   747 (global-set-key [f6]    'toggle-truncate-lines)
   746 (global-set-key [f6]    'toggle-truncate-lines)
   748 (global-set-key [s-tab] 'other-window)
   747 (global-set-key [s-tab] 'other-window)
   749 
   748 
   750 ;; Disable suspend. It is ugly.
   749 ;; Disable suspend. It is ugly.
   797   nil
   796   nil
   798   )
   797   )
   799  )
   798  )
   800 
   799 
   801 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   800 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   802 (message "switching, creating, selecting buffers")
   801 (message "selecting/switching, creating, killing buffers")
   803 
   802 
   804 (global-set-key [?\C-x right] 'next-buffer)
   803 (global-set-key [?\C-x right] 'next-buffer)
   805 (global-set-key [?\C-x left]  'previous-buffer)
   804 (global-set-key [?\C-x left]  'previous-buffer)
       
   805 (global-set-key (kbd "C-x C-k") 'kill-this-buffer)
       
   806 (global-set-key [?\C-x down] 'kill-this-buffer)
   806 
   807 
   807 (iswitchb-mode 1)
   808 (iswitchb-mode 1)
   808 (setq iswitchb-regexp t)
   809 (setq iswitchb-regexp t)
   809 (setq iswitchb-use-virtual-buffers t)
   810 (setq iswitchb-use-virtual-buffers t)
   810 (setq iswitchb-buffer-ignore
   811 (setq iswitchb-buffer-ignore