(defun fwoar::get-candidates ()
  (funcall (-compose (fwoar/exclude
                      (fwoar/matches-regex "/\\(.*[#]\\)"))
                     'project-files
                     'project-current)))

(defun fwoar::browse-project ()
  (interactive)
  (if (package-installed-p 'projectile)
      (helm-projectile)
    (fwoar::helm-find-file-in-project)))
(defvar fwoar::*helm-project-files-source*
  `((name . "Project Files")
    (candidates . (lambda ()
                    (let* ((fwoar::project (project-current))
                           (fwoar::root (project-root fwoar::project)))
                      (mapcar (lambda (it)
                                (cons (f-relative it fwoar::root)
                                      it))
                              (project-files fwoar::project)))))
    (action . helm-find-files-actions)))
(defun fwoar::helm-find-file-in-project ()
  (interactive)
  (helm '(fwoar::*helm-project-files-source*)))

    (evil-define-key 'normal 'global (kbd "<leader>f") 'helm-projectile)

    (evil-define-key 'normal 'global (kbd "<leader>f") 'fwoar::browse-project)