(cd "~")
(set-language-environment "Japanese")
(mw32-ime-initialize)(setq default-input-method "MW32-IME")
;;euc(setq default-buffer-file-coding-system 'euc-japan-unix)
;;font(create-fontset-from-request "private-fontset" '((width . 8) (height . 16) (fixed . t) (italic . nil)) '((family . "MS ゴシック") (family . "Courier New")))
;; font shinonome(不要なら nil にする)(setq bdf-font-directory-shinonome "D:/apps/Meadow/fonts/shinonome")(setq bdf-use-shinonome12 t bdf-use-shinonome12min t bdf-use-shinonome12maru t bdf-use-shinonome14 t bdf-use-shinonome14min t bdf-use-shinonome16 t bdf-use-shinonome16min t)(load "meadow2-shinonome-fontset")
;;font default set(setq default-frame-alist (append (list '(font . "shinonome16") '(top . 10) '(left . 20) '(width . 81) '(height . 35) ) default-frame-alist))
;;color(global-font-lock-mode t)(require 'font-lock)
;;transient-mark-mode(transient-mark-mode t)
;;line number(require 'setnu)(global-set-key [f12] 'setnu-mode)
;;toggle(global-set-key [f8] 'toggle-truncate-lines)
;;windmove-default-keybindings(windmove-default-keybindings)
;;not use backupfile(setq make-backup-files nil)
;;iswitchb-mode(iswitchb-mode t)
;;shell(setq explicit-shell-file-name "bash.exe")(setq shell-file-name "bash.exe")(setq shell-command-switch "-c")
;;lgrep(setq grep-command "lgrep -n -Ks -Os ")(setq grep-find-command "find . -type f -path '*.svn*' -prune -o -print0 | xargs -0 -e lgrep -n -Ks -Os ")(setq grep-program "lgrep")
;;tab(setq-default tab-width 4)(setq-default c-basic-offset 4)(setq-default indent-tabs-mode nil)
;;php(load-library "php-mode-120")(require 'php-mode)(add-to-list 'auto-mode-alist '(".inc$" . php-mode))(add-to-list 'auto-mode-alist '(".tpl$" . php-mode))(add-to-list 'auto-mode-alist '(".thtml$" . php-mode))(setq php-mode-force-pear t)(add-hook 'php-mode-user-hook '(lambda () (setq tab-width 4) (setq c-basic-offset 4) (setq indent-tabs-mode nil) (setq php-manual-path "~/php/doc/html/") (setq php-manual-url "http://www.phppro.jp/phpmanual/") ) )
;;show-paren-mode(show-paren-mode t)(setq show-paren-style 'mixed)(set-face-background 'show-paren-match-face "gray10")(set-face-foreground 'show-paren-match-face "SkyBlue")
;;svn todo;;(add-to-list 'vc-handled-backends 'SVN)(autoload 'svn-status "psvn" nil t)
;;zengaku space tab(defface my-face-b-1 '((t (:background "medium aquamarine"))) nil)(defface my-face-b-2 '((t (:background "gray26"))) nil)(defface my-face-u-1 '((t (:foreground "SteelBlue" :underline t))) nil)(defvar my-face-b-1 'my-face-b-1)(defvar my-face-b-2 'my-face-b-2)(defvar my-face-u-1 'my-face-u-1)(defadvice font-lock-mode (before my-font-lock-mode ()) (font-lock-add-keywords major-mode '( (" " 0 my-face-b-1 append) ("t" 0 my-face-b-2 append) ("[ ]+$" 0 my-face-u-1 append) )))(ad-enable-advice 'font-lock-mode 'before 'my-font-lock-mode)(ad-activate 'font-lock-mode)(add-hook 'find-file-hooks '(lambda ()(if font-lock-modenil(font-lock-mode t))) t)