init_Carbon.el

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; CSE環境向けCarbon Emacsお勧め初期設定
;; Ver. 20170130
;;
;;
;; Copyright Eitetsu Oomoto 2016-2017
;;
;; 対象とするEmacs.appのディストリビューション
;;    Carbon Emacs (Emacs 22.3ベース)
;;           http://th.nao.ac.jp/MEMBER/zenitani/emacs-j.html
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(message "%s" "DEBUG: init_Carbon.el is loaded.")

(setq default-input-method "MacOSX")

;; html-helper-mode設定
;; 参考: http://oku.edu.mie-u.ac.jp/~okumura/html/emacs.html
(autoload 'html-helper-mode "html-helper-mode" "Yay HTML" t)
(setq auto-mode-alist (cons '("\\.html$" . html-helper-mode) auto-mode-alist))
(setq html-helper-verbose nil)

(defvar html-helper-new-buffer-template
  '("<?xml version=\"1.0\" encoding=\"utf-8\"?>\n"
    "<html>\n"
    "<head>\n"
    "<meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\" />\n"
    "</head>\n"
    "<body>\n"
    "<!-- ここから削除 \n"
    "\n"
    "京都産業大学コンピュータ理工学部CSE環境HTMLテンプレート\n"
    "\n"
    "自分のオリジナル内容のWebページを作成してください．\n"
     "ページを作成し始めるときには、上に見える「ここから削除」という行から\n"
     "下に見える「ここまで削除」という行までを削除してから始めてください。\n"
     "\n"
     "Enjoy!\n"
     "     ここまで削除 -->\n"
     "</body>\n"
     "</html>\n")
   "*Template for new buffers, inserted by html-helper-insert-new-buffer-strings if html-helper-build-new-buffer is set to t")
 (message "%s" "DEBUG: html-helper-mode setup is done.")
 
 
 ;;;;;;;; End of init_Carbon.el ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;