view .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 source

;;; 対応する括弧を光らせる。
(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)

					))