gistfile1.txt

(require 'ess-site)
(setq ess-ask-for-ess-directory nil)
(setq ess-pre-run-hook
	'((lambda ()
	(setq default-process-coding-system '(sjis . sjis))
	)))

(set-language-environment "Japanese")
(set-default-coding-systems 'sjis)
(set-terminal-coding-system 'sjis)
(set-buffer-file-coding-system 'sjis)
(set-keyboard-coding-system 'sjis)

(tool-bar-mode -1)
(menu-bar-mode -1)
(show-paren-mode t)
(setq show-paren-style 'mixed)
(set-face-background 'show-paren-match-face "red")
(set-face-foreground 'show-paren-match-face "blue")

(define-key global-map "\C-H" 'backward-delete-char)

(defun ess:format-window-1 ()
	(split-window-horizontally)
	(other-window 1)
	(split-window)
	(other-window 1))
(add-hook 'ess-pre-run-hook 'ess:format-window-1)

(setq default-frame-alist
      (append (list '(foreground-color . "azure3")
	'(background-color . "black")
	'(border-color . "black")
	'(mouse-color . "white")
	'(cursor-color . "white")
	'(width . 155)
	'(height . 59)
	'(top . 0)
	'(left . 0)
	)
	default-frame-alist))

;;;yatex
(setq auto-mode-alist(cons (cons "\\.tex$" 'yatex-mode) auto-mode-alist))
(autoload 'yatex-mode "yatex" "Yet Another LaTeX mode" t)
(setq load-path (cons "~/site-lisp/yatex" load-path))
(setq tex-command "C:/tex/bin/platex.exe")
(setq dvi2-command "C:/tex/dviout/dviout.exe")
(setq dviprint-command-format "C:/tex/bin/dvipdfmx.exe %s")

(setq explicit-shell-file-name "cmdproxy.exe")
(setq shell-file-name "cmdproxy.exe")