                   (find-file-literally (expand-file-name file ,(projectile-project-root)))
                   (run-hooks 'projectile-find-file-hook))))
 
+    (defun modi/projectile-switch-project-magit-status ()
+      "Switch to other project and open Magit status there."
+      (interactive)
+      (let ((projectile-switch-project-action #'magit-status))
+        (call-interactively #'projectile-switch-project)))
+
     (defhydra hydra-projectile-other-window (:color teal)
       "projectile-other-window"
-      ("f"  projectile-find-file-other-window        "file")
-      ("g"  projectile-find-file-dwim-other-window   "file dwim")
-      ("d"  projectile-find-dir-other-window         "dir")
-      ("b"  projectile-switch-to-buffer-other-window "buffer")
-      ("q"  nil                                      "cancel" :color blue))
+      ("b" projectile-switch-to-buffer-other-window "buffer")
+      ("D" projectile-find-dir-other-window "dir")
+      ("f" projectile-find-file-other-window "file")
+      ("F" projectile-find-file-dwim-other-window "file dwim")
+      ("q" nil "cancel" :color blue))
 
     (defhydra hydra-projectile (:color teal
                                 :hint  nil)

      ("F"   projectile-find-file-dwim)
      ("D"   projectile-find-dir)
      ("E"   projectile-edit-dir-locals)
      ("g"   ggtags-update-tags)
      ("i"   projectile-ibuffer)
      ("K"   projectile-kill-buffers)
      ("s-k" projectile-kill-buffers)

;; Time-stamp: <2017-07-13 11:07:24 kmodi>

;; Projectile
;; https://github.com/bbatsov/projectile
