 ;;;_. whole-line-or-region
 (use-package whole-line-or-region)
 
+;;;_. which-func
+(which-function-mode t)
+(eval-after-load "which-func"
+  '(add-to-list 'which-func-modes 'sepia-mode)
+  '(add-to-list 'which-func-modes 'org-mode)
+)
+
 ;;;_. iy-go-to-char
 (use-package iy-go-to-char
      :init 

    (local-set-key (kbd "RET") 'electrify-return-if-match)
    (eldoc-add-command 'electrify-return-if-match)
    (show-paren-mode t)))

;;;_. key-chord
(use-package key-chord

                   (vcs git)
                   (ack-args "--perl --js --html --css")
                   (compile-cmd nil)
                   (startup-hook (lambda ()
                                   (make-directory (file-name-directory (expand-file-name mk-proj-file-list-cache)) t)
                                   (make-directory (file-name-directory (expand-file-name mk-proj-open-files-cache)) t)
