Mercurial > hg > Members > kokubo > emacs
diff .emacs.d/.emacs.el @ 0:2764b4f45f9f
1st commit
author | Shohei KOKUBO <e105744@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 21 Apr 2014 04:30:59 +0900 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/.emacs.d/.emacs.el Mon Apr 21 04:30:59 2014 +0900 @@ -0,0 +1,71 @@ +;;; 対応する括弧を光らせる。 +(show-paren-mode 1) + +;;; カーソルの位置が何文字目かを表示する +(column-number-mode t) + +;;; カーソルの位置が何行目かを表示する +(line-number-mode t) + +;;; スクロールを一行ずつにする +(setq scroll-step 1) + +;;; 行の先頭でC-kを一回押すだけで行全体を消去する +(setq kill-whole-line t) + +;;; モードラインに時間を表示する +(display-time) + +;;; 現在の関数名をモードラインに表示 +(which-function-mode 1) + +;;; 補完時に大文字小文字を区別しない +(setq completion-ignore-case t) + +;;; 強力な補完機能を使う +;;; p-bでprint-bufferとか +;;(load "complete") +(partial-completion-mode 1) + +;;; 補完可能なものを随時表示 +;;; 少しうるさい +(icomplete-mode 1) + +;; スプラッシュ非表示 : 起動が速くなる +(setq inhibit-startup-message t) + +;;; don't make backup file +(setq make-backup-files nil) + +;;; don't make save-default file +(setq auto-save-default nil) + +;;; C-h to delete +(define-key global-map "\C-h" 'delete-backward-char) + +;;; C-z to undo +(define-key global-map "\C-z" 'undo) + +;;オートインデント +(global-set-key "\C-m" 'newline-and-indent) +(global-set-key "\C-j" 'newline) + +;;インデント幅 +(setq c-default-style "user") + +;;カラースキン +(if window-system (progn + + (set-face-foreground 'font-lock-comment-face "MediumSeaGreen") + (set-face-foreground 'font-lock-string-face "purple") + (set-face-foreground 'font-lock-keyword-face "blue") + (set-face-foreground 'font-lock-function-name-face "blue") + (set-face-bold-p 'font-lock-function-name-face t) + (set-face-foreground 'font-lock-variable-name-face "black") + (set-face-foreground 'font-lock-type-face "LightSeaGreen") + (set-face-foreground 'font-lock-builtin-face "purple") + (set-face-foreground 'font-lock-constant-face "black") + (set-face-foreground 'font-lock-warning-face "blue") + (set-face-bold-p 'font-lock-warning-face nil) + + )) \ No newline at end of file