;; *** Projectile
(use-package projectile
             :config
             (projectile-mode +1)

             (defun tvd-dir-to-projectile ()
               "drop a .projectile wherever we are"
               (interactive)
               (with-temp-file ".projectile"
                 (insert "-.snapshot\n-.git\n-.RCS\n"))
               (message (format "Turned %s into projectile project" default-directory)))

             ;; FIXME: add custom docstring
             (when (fboundp 'defhydra)
               (defhydra hydra-projectile
                 ( :color teal
                          :columns 4)
                 "Projectile (use C-p for this menu)"
                 ("s"   projectile-switch-project           "Switch Project")
                 ("f"   projectile-find-file                "Find File")
                 ("r"   projectile-recentf                  "Recent Files")
                 ("b"   projectile-ibuffer                  "Show Project Buffers")

                 ("g"   projectile-grep                     "Grep")
                 ("o"   projectile-multi-occur              "Multi Occur")
                 ("d"   projectile-dired                    "Project Dired")
                 ("R"   projectile-replace                  "Replace in Project")

                 ("C"   projectile-invalidate-cache         "Clear Cache")
                 ("t"   projectile-regenerate-tags          "Regenerate Tags")
                 ("X"   projectile-cleanup-known-projects   "Cleanup Known Projects")
                 ("n"   tvd-dir-to-projectile               "Turn current directory into Projectile")

                 ("c"   projectile-commander                "Commander")
                 ("k"   projectile-kill-buffers             "Kill Buffers")
                 ("q"   nil                                 "Cancel" :color blue))

               (global-set-key (kbd "C-x p") 'hydra-projectile/body)))