~/.emacs
以下 .emacs 是我跟据 http://linux.hiweed.com/node/1391 的文章《Debian下使用GNU Emacs》修改了一下得来的,谢谢原作者嘻嘻。
;;-------------------------中文设定--------------------------
;; Setup GBK environment
(set-terminal-coding-system 'euc-cn)
(set-keyboard-coding-system 'euc-cn)
(set-language-environment 'Chinese-GB)
(setq locale-coding-system 'utf-8)
(setq current-language-environment "Chinese-GBK")
(prefer-coding-system 'utf-8)
;;-------------------------向其他X程序粘贴中文---------------
(when (fboundp 'utf-translate-cjk-mode)
;; Load modified utf-translate-cjk-mode
(require 'gbk-utf-mode)
;; Turn on utf-translate-cjk-mode
(utf-translate-cjk-mode 1)
;; Setup X selection for unicode encoding
(setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)))
;;-------------------------语法加亮--------------------------
(global-font-lock-mode 't)
;;-------------------------关闭错误提示的Beep音--------------
(setq visible-bell t)
;;-------------------------关闭启动时的`开机画面'------------
(setq inhibit-startup-message t)
;;-------------------------显示列号--------------------------
(setq column-number-mode t)
;;-------------------------括号匹配--------------------------
;;括号匹配时显示另一端的括号,而不是跳过去
(show-paren-mode t)
(setq show-paren-style 'parentheses)
;;-------------------------标题拦显示buffer的名字------------
(setq frame-title-format "emacs@%b")
;;-------------------------Shell 使用 ansi color-------------
(autoload 'ansi-color-for-comint-mode-on "ansi-color" nil t)
(add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on)
;;-------------------------使用Win下的选择习惯---------------
;;用shift+方向键进行选择
(pc-selection-mode)
以下 .emacs 是我跟据 http://linux.hiweed.com/node/1391 的文章《Debian下使用GNU Emacs》修改了一下得来的,谢谢原作者嘻嘻。
;;-------------------------中文设定--------------------------
;; Setup GBK environment
(set-terminal-coding-system 'euc-cn)
(set-keyboard-coding-system 'euc-cn)
(set-language-environment 'Chinese-GB)
(setq locale-coding-system 'utf-8)
(setq current-language-environment "Chinese-GBK")
(prefer-coding-system 'utf-8)
;;-------------------------向其他X程序粘贴中文---------------
(when (fboundp 'utf-translate-cjk-mode)
;; Load modified utf-translate-cjk-mode
(require 'gbk-utf-mode)
;; Turn on utf-translate-cjk-mode
(utf-translate-cjk-mode 1)
;; Setup X selection for unicode encoding
(setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)))
;;-------------------------语法加亮--------------------------
(global-font-lock-mode 't)
;;-------------------------关闭错误提示的Beep音--------------
(setq visible-bell t)
;;-------------------------关闭启动时的`开机画面'------------
(setq inhibit-startup-message t)
;;-------------------------显示列号--------------------------
(setq column-number-mode t)
;;-------------------------括号匹配--------------------------
;;括号匹配时显示另一端的括号,而不是跳过去
(show-paren-mode t)
(setq show-paren-style 'parentheses)
;;-------------------------标题拦显示buffer的名字------------
(setq frame-title-format "emacs@%b")
;;-------------------------Shell 使用 ansi color-------------
(autoload 'ansi-color-for-comint-mode-on "ansi-color" nil t)
(add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on)
;;-------------------------使用Win下的选择习惯---------------
;;用shift+方向键进行选择
(pc-selection-mode)