;; Redefine M-x to C-x C-m
(global-set-key "\C-x\C-m" 'execute-extended-command)
;; C-x C-b to list all buffers
;; n, p move up/down to select a buffer
;; S save selected buffer
;; D delete selected buffer
(global-set-key "\C-x\C-b" 'electric-buffer-list)
;; C-x k to close the current buffer
;; If want to close other buffer, C-x C-b select a buffer and D
(global-set-key "\C-xk" 'kill-this-buffer)
;; Unbind C-SPC
(global-unset-key (kbd "C-SPC"))
;; C-x C-r to define a region
(global-set-key "\C-x\C-r" 'set-mark-command)
;; C-x C-k to kill a region
(global-set-key "\C-x\C-k" 'kill-region)
;; C-x w to backward kill a word
(global-set-key "\C-xw" 'backward-kill-word)
;; C-x g to goto a specified line
(global-set-key "\C-xg" 'goto-line)
;; Cursor color
(set-cursor-color "green")
;; Changes all yes/no questions to y/n type
(fset 'yes-or-no-p 'y-or-n-p)
;; Use SPACE instead of TAB
(setq-default indent-tabs-mode nil)
(setq-default tab-width 4)
;; Don't generate temporary file
(setq-default make-backup-files nil)
;; Set lisp interactive environment (SLIME)
(setq inferior-lisp-program "/usr/local/bin/clisp")
(add-to-list 'load-path "~/ports/slime")
(require 'slime)
(slime-setup)
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(column-number-mode t)
'(current-language-environment "UTF-8")
'(default-input-method "chinese-py")
'(inhibit-startup-screen t)
'(show-paren-mode t)
'(size-indication-mode t)
'(tool-bar-mode nil))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(default ((t (:inherit nil :stipple nil :background "gray25" :foreground "green" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 98 :width normal :foundry "bitstream" :family "Bitstream Vera Sans Mono")))))
另外，Emacs使用外部输入法，比如scim时，必须设置LANG为中文环境，比如LANG=zh_CN.UTF-8
阅读(2050) | 评论(0) | 转发(0) |
