664 (global-set-key [C-end] 'end-of-buffer) |
664 (global-set-key [C-end] 'end-of-buffer) |
665 (global-set-key [C-delete] 'kill-word) |
665 (global-set-key [C-delete] 'kill-word) |
666 (global-set-key [delete] 'delete-char) |
666 (global-set-key [delete] 'delete-char) |
667 ;; (global-set-key [backspace] 'backward-delete-char-untabify) ; not work properly in *info* mode |
667 ;; (global-set-key [backspace] 'backward-delete-char-untabify) ; not work properly in *info* mode |
668 |
668 |
669 ;; setting some f[1-12] keys |
|
670 (global-set-key [f1] 'help) |
|
671 (global-set-key [f2] 'save-buffer) |
669 (global-set-key [f2] 'save-buffer) |
672 (global-set-key [f4] 'ispell-buffer) |
|
673 (global-set-key [S-f6] 'rename-buffer) |
670 (global-set-key [S-f6] 'rename-buffer) |
674 (global-set-key (kbd "C-x C-k") 'kill-this-buffer) |
671 (global-set-key (kbd "C-x C-k") 'kill-this-buffer) |
675 (global-set-key [M-f4] 'save-buffers-kill-emacs) |
672 (global-set-key [M-f4] 'save-buffers-kill-emacs) |
676 (global-set-key [f6] 'toggle-truncate-lines) |
673 (global-set-key [f6] 'toggle-truncate-lines) |
677 |
|
678 ;; frames, windows manipulation, switch buffers |
|
679 (global-set-key [?\C-x right] 'next-buffer) |
|
680 (global-set-key [?\C-x left] 'previous-buffer) |
|
681 |
674 |
682 ;; Disable suspend. It ugly. |
675 ;; Disable suspend. It ugly. |
683 (when window-system |
676 (when window-system |
684 (global-set-key (kbd "C-z") nil)) |
677 (global-set-key (kbd "C-z") nil)) |
685 (global-set-key (kbd "C-x C-z") nil) |
678 (global-set-key (kbd "C-x C-z") nil) |
730 ) |
723 ) |
731 ) |
724 ) |
732 |
725 |
733 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
726 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
734 (message "switching, creating, selecting buffers") |
727 (message "switching, creating, selecting buffers") |
|
728 |
|
729 (global-set-key [?\C-x right] 'next-buffer) |
|
730 (global-set-key [?\C-x left] 'previous-buffer) |
735 |
731 |
736 (iswitchb-mode 1) |
732 (iswitchb-mode 1) |
737 (setq iswitchb-buffer-ignore |
733 (setq iswitchb-buffer-ignore |
738 '("^ " |
734 '("^ " |
739 "^\*Buffer" |
735 "^\*Buffer" |