(setq inhibit-startup-message t)

;;; AUCTeX
;;; M-x package-install
;;; auctex
;;; sudo choco install sumatrapdf -y
; (setq japanese-TeX-engine-default 'ptex)
; (setq japanese-LaTeX-default-style "jsarticle")
; (setq TeX-engine 'ptex)
; (setq TeX-PDF-from-DVI "Dvipdfmx")
; (setenv "Path" (concat "C:\\Program Data\\chocolatey\\bin\\SumatraPDF;" (getenv "Path")))
; (setq exec-path (append exec-path '("C:\\ProgramData\\chocolatey\\bin\\SumatraPDF")))
; (setq TeX-view-program-selection '((output-pdf "SumatraPDF")))

;;; auto-complete
;;; M-x package-install
;;; auto-complete
;;; fuzzy も package-install しておく。
; (require 'auto-complete-config)
; (ac-config-default)
; (add-to-list 'ac-modes 'text-mode)  ;; text-modeでも自動的に有効にする
; (add-to-list 'ac-modes 'latex-mode)
; (ac-set-trigger-key "TAB")
; (setq ac-use-menu-map t)       ;; 補完メニュー表示時にC-n/C-pで補完候補選択
; (setq ac-use-fuzzy t)          ;; 曖昧マッチ fuzzy.el も package-install

;;; gnuplot mode
;;; M-x package-install
;;; gnuplot
; (require 'gnuplot)
; (autoload 'gnuplot-mode "gnuplot" "gnuplot major mode" t)
; (autoload 'gnuplot-make-buffer "gnuplot" "open a buffer in gnuplot mode" t)
; (setq auto-mode-alist (append '(("\\.gp$" . gnuplot-mode)) auto-mode-alist))

;;; Windows では aspell がないため、以下は無用。
;;; Spell
;;; echo "lang en_US" >> ~/.aspell.conf
;;; (setq-default ispell-program-name "aspell")
;;; (eval-after-load "ispell"
;;;  '(add-to-list 'ispell-skip-region-alist '("[^\000-\377]+")))
;;; (add-hook 'latex-mode-hook 'flyspell-mode)

;;; Text mode
(setq default-major-mode 'text-mode)
(add-hook 'text-mode-hook 'turn-on-auto-fill)
;;; 括弧の対応関係をハイライト表示
(show-paren-mode 1)

;;; 行番号の設定（F5 キーで表示・非表示を切り替え）
;;; linum.el が必要だけど，通常は入っている．
(require 'linum)
(global-linum-mode 0)
(global-set-key [f5] 'linum-mode)
(setq linum-format
	(lambda (line) (propertize (format
		(let ((w (length (number-to-string
			(count-lines (point-min) (point-max))
		)))) (concat "%" (number-to-string w) "d "))
	line) 'face 'linum)))
(setq linum-format "%4d ")

;;; % Time-stamp: <>
;;; と書いておくと，保存したときにタイムスタンプが書き込まれます。
(if (not (memq 'time-stamp write-file-hooks))
(setq write-file-hooks (cons 'time-stamp write-file-hooks)))