.emacs.el

gistfile1.txt

;シフトで範囲選択
(pc-selection-mode 1)

;バックアップ作らない
(setq make-backup-files nil)
;オートセーブしない
(setq auto-save-default nil)
;スタート画面を表示しない
(setq inhibit-startup-message t)
;ツールバーを隠す
(tool-bar-mode nil)

;行場号を表示する
(line-number-mode t)
;linum.elを読み込んでおく
(require 'linum nil t)

;caml-mode
(require 'caml nil t)

;デフォルトのタブは2つ分
(setq default-tab-width 2)
(setq mac-option-modifier 'meta)
(setq-default indent-tabs-mode nil) 
(global-set-key "\C-k" `backward-word)
(global-set-key "\C-l" `forward-word)
(global-set-key "\M-k" `beginning-of-line)
(global-set-key "\M-l" `end-of-line)
(global-set-key "\C-j" `goto-line)
(global-set-key "\M-m" `scroll-down)
(global-set-key "\M-n" `scroll-up)
(global-set-key "\C-p" `yank)
(global-set-key "\C-o" `copy-region-as-kill)
(global-set-key "\C-y" `kill-region)
(global-set-key "\C-u" `kill-line)
(global-set-key "\M-a" `mark-whole-buffer)
(global-set-key "\M-z" `advertised-undo)
(global-set-key "\C-b" `buffer-menu) 

;外見の設定
(if window-system (progn
  (setq initial-frame-alist '((width . 189) (height . 45)(top . 0)( left . 0)))
  (set-background-color "White")
  (set-foreground-color "Black")
  (set-cursor-color "Black")
))
;半透明化
;(add-to-list 'default-frame-alist '(alpha . (0.80 0.80)))

(define-key esc-map " " 'expand-abbrev);

;; js2-mode - JavaScript
;;(autoload 'js2-mode "js2" nil t)
;;(add-to-list 'auto-mode-alist '("\\.js$" . js2-mode))

;(keyboard-translate ?\M-TAB ?\M-j)
;(keyboard-translate ?\M-j ?\M-TAB)