                         :foreground "#cd6600")
     (set-face-attribute 'font-lock-keyword-face nil
                         :foreground "#ff6eb4")
+    (set-face-attribute 'markdown-header-face nil
+                        :height 1.1
+                        :foreground "#87ceff"
+                        :bold t)
+    (set-face-attribute 'markdown-header-rule-face nil
+                        :inherit 'markdown-header-face)
+    (set-face-attribute 'markdown-header-delimiter-face nil
+                        :inherit 'markdown-header-face)
     (set-face-attribute 'whitespace-tab nil
                         :background "#1f1f1f"))
   )

  ;;       (http://www.emacswiki.org/emacs/TabBarMode)
  (setq tabbar-buffer-groups-function (lambda () (list "Buffers")))

  (when (require 'cl nil t) ;; remove-if とかに必要

    ;; 表示するタブのフィルタリング
    ;;   * で始まるバッファはタブに表示しない
    (setq tabbar-buffer-list-function
          (lambda ()
            (remove-if
             (lambda (b)
               (and (string-match "^ ?\\*" (buffer-name b))
                    (not (string-equal (buffer-name (current-buffer))
                                       (buffer-name b)))))
             (buffer-list)))))

  ;; 左に表示されるボタンを消す
  (dolist (button '(tabbar-buffer-home-button

;; -*- mode: lisp-interaction; syntax: elisp; coding: utf-8-unix -*-

(require 'cl)

;; パッケージ管理
(require 'package)
