 ;; Copyright (C) 2014 Alexander Prusov
 
 ;; Author: Your Name <yourname@example.com>
-;; Version: 1.0.3
+;; Version: 1.0.4
 ;; Maintainer: Someone Else <someone@example.com>
 ;; Created: 14 Jul 2010
 ;; Keywords: project

    (if project
        (let ((settings (apm-project-settings project)))
          (while settings
            (unwind-protect (eval (car settings)) (setq settings '()))
            (setq settings (cdr settings)))))))

(defun apm-compile (command &optional comint)

(defun apm-find-project ()
  (interactive)
  (let ((projects-list (apm-local-get-projects-path)))
    (with-temp-buffer
      (setq default-directory (ido-completing-read "Project: " projects-list))
      (ido-find-file))))

;;;###autoload
(define-minor-mode apm-minor-mode
