Define imalison:projectile-find-file using imalison:prefix-alternatives

This commit is contained in:
Ivan Malison 2016-06-20 01:10:21 -07:00
parent 50b5ea66e0
commit afcd5804c0

View File

@ -1590,6 +1590,10 @@ I use helm for almost all emacs completion
(imalison:prefix-alternatives imalison:do-ag helm-projectile-ag (imalison:prefix-alternatives imalison:do-ag helm-projectile-ag
imalison:do-ag-default-directory helm-do-ag) imalison:do-ag-default-directory helm-do-ag)
(imalison:prefix-alternatives imalison:projectile-find-file
projectile-find-file
projectile-find-file-other-window)
(defun projectile-make-all-subdirs-projects (directory) (defun projectile-make-all-subdirs-projects (directory)
(cl-loop for file-info in (directory-files-and-attributes directory) (cl-loop for file-info in (directory-files-and-attributes directory)
@ -1597,12 +1601,7 @@ I use helm for almost all emacs completion
(write-region "" nil (write-region "" nil
(expand-file-name (expand-file-name
(concat directory "/" (concat directory "/"
(nth 0 file-info) "/.projectile")))))) (nth 0 file-info) "/.projectile")))))))
(defun imalison:projectile-find-file (arg)
(interactive "P")
(if arg
(projectile-find-file-other-window)
(projectile-find-file))))
:config :config
(progn (progn
(use-package persp-projectile (use-package persp-projectile