   )
 
 ;; flymake 使うとき
-(defvar flymake-display-err-delay 1
-  "delay to display flymake error message ")
-(defvar flymake-display-err-timer nil
-  "timer for flymake-display-err-menu-for-current-line")
-(defvar flymake-display-err-before-line nil)
-(defvar flymake-display-err-before-colmun nil)
-
 (eval-after-load "flymake"
-  '(when (require 'popup nil t)
-
-     ;; flymake 現在行のエラーをpopup.elのツールチップで表示する
-     ;; https://gist.github.com/292827
-     (defun flymake-display-err-menu-for-current-line ()
-       (interactive)
-       (let* ((line-no (flymake-current-line-no))
-              (line-err-info-list (nth 0 (flymake-find-err-info flymake-err-info
-                                                                line-no))))
-         (when (and (flymake-display-err-check-moved line-no (current-column))
-                    line-err-info-list)
-           (setq flymake-display-err-before-line-no line-no)
-           (let* ((count (length line-err-info-list))
-                  (menu-item-text nil))
-             (while (> count 0)
-               (setq menu-item-text
-                     (flymake-ler-text (nth (1- count) line-err-info-list)))
-               (let* ((file (flymake-ler-file (nth (1- count) line-err-info-list)))
-                      (line (flymake-ler-line (nth (1- count) line-err-info-list))))
-                 (if file
-                     (setq menu-item-text
-                           (concat menu-item-text " - " file "(" (format "%d" line) ")"))))
-               (setq count (1- count))
-               (if (> count 0) (setq menu-item-text (concat menu-item-text "\n")))
-               )
-             (popup-tip menu-item-text)))))
-
-     (defun flymake-display-err-check-moved (cur-line cur-col)
-       (let* ((is-not-moved (and flymake-display-err-before-line
-                                 flymake-display-err-before-colmun
-                                 (= cur-line flymake-display-err-before-line)
-                                 (= cur-col flymake-display-err-before-colmun))))
-         (setq flymake-display-err-before-line cur-line
-               flymake-display-err-before-colmun cur-col)
-         (not is-not-moved)))
-
-     (global-set-key "\M-e"
-                     '(lambda ()
-                        (interactive)
-                        (let ()
-                          (message "next error")
-                          (flymake-goto-next-error)
+  '(let nil
+     (defvar flymake-display-err-delay 1
+       "delay to display flymake error message ")
+     (defvar flymake-display-err-timer nil
+       "timer for flymake-display-err-menu-for-current-line")
+     (defvar flymake-display-err-before-line nil)
+     (defvar flymake-display-err-before-colmun nil)
+
+     (when (require 'popup nil t)
+
+       ;; flymake 現在行のエラーをpopup.elのツールチップで表示する
+       ;; https://gist.github.com/292827
+       (defun flymake-display-err-menu-for-current-line ()
+         (interactive)
+         (let* ((line-no (flymake-current-line-no))
+                (line-err-info-list (nth 0 (flymake-find-err-info flymake-err-info
+                                                                  line-no))))
+           (when (and (flymake-display-err-check-moved line-no (current-column))
+                      line-err-info-list)
+             (setq flymake-display-err-before-line-no line-no)
+             (let* ((count (length line-err-info-list))
+                    (menu-item-text nil))
+               (while (> count 0)
+                 (setq menu-item-text
+                       (flymake-ler-text (nth (1- count) line-err-info-list)))
+                 (let* ((file (flymake-ler-file (nth (1- count) line-err-info-list)))
+                        (line (flymake-ler-line (nth (1- count) line-err-info-list))))
+                   (if file
+                       (setq menu-item-text
+                             (concat menu-item-text " - " file "(" (format "%d" line) ")"))))
+                 (setq count (1- count))
+                 (if (> count 0) (setq menu-item-text (concat menu-item-text "\n")))
+                 )
+               (popup-tip menu-item-text)))))
+
+       (defun flymake-display-err-check-moved (cur-line cur-col)
+         (let* ((is-not-moved (and flymake-display-err-before-line
+                                   flymake-display-err-before-colmun
+                                   (= cur-line flymake-display-err-before-line)
+                                   (= cur-col flymake-display-err-before-colmun))))
+           (setq flymake-display-err-before-line cur-line
+                 flymake-display-err-before-colmun cur-col)
+           (not is-not-moved)))
+
+       (global-set-key "\M-e"
+                       '(lambda ()
+                          (interactive)
+                          (let ()
+                            (message "next error")
+                            (flymake-goto-next-error)
                           (flymake-display-err-menu-for-current-line))))
      (global-set-key "\M-E"
                      '(lambda ()

           face
           ;; タブ
           tabs
           ;; タブの前にあるスペース
           space-before-tab
           ;; タブの後にあるスペース
           space-after-tab
           )))
  (add-hook 'markdown-mode-hook 'kui/markdown-init-set-values)
  )

;; yaml-mode


;; BS でマーク範囲を消す
(delete-selection-mode 1)

;; Emacs のフレームの横幅最小値（文字数で指定）
(defvar kui/min-colmun-number 80) ;; 80 文字
