 ;; Copyright (C) 2014 Alexander Prusov
 
 ;; Author: Alexander Prusov <alexprusov@gmail.com>
-;; Version: 2.4.0
+;; Version: 2.4.1
 ;; Created: 7.11.2014
 ;; Keywords: project
 ;; Homepage: https://github.com/Plambir/emacs-bootstrap

    (when project
      (with-temp-buffer
        (setq default-directory (concat (apm-project-path project) "/"))
        (split-string (shell-command-to-string (concat "find . "
                                                       (apm--ignore-flags project)
                                                       (apm--show-flags project)
                                                       apm-find-args " "))

      (if (and project (not arg))
          (with-temp-buffer
            (setq default-directory (concat (apm-project-path project) "/"))
            (find-file (completing-read "Find file: " (apm--get-project-files) nil t nil nil (car (apm--get-project-files)))))
        (call-interactively 'find-file)))))

(defun apm--apply-global-vars ()
