diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el
index 8dc67bd5..77d9c870 100644
--- a/dotfiles/emacs.d/init.el
+++ b/dotfiles/emacs.d/init.el
@@ -1286,6 +1286,13 @@ window is active in the perspective."
   :demand t
   :config
   (progn
+    (defun projectile-make-all-subdirs-projects (directory)
+      (cl-loop for file-info in (directory-files-and-attributes directory)
+               do (when (nth 1 file-info)
+                    (write-region "" nil
+                                  (expand-file-name
+                                   (concat directory "/"
+                                           (nth 0 file-info) "/.projectile"))))))
     (defun do-ag (&optional arg)
       (interactive "P")
       (if arg (helm-do-ag) (helm-projectile-ag)))