                           (vendle:concat-path *vendle-directory* (vendle:package-name package)))
                  *vendle-directory*)
   (byte-recompile-directory (vendle:package-path package)  0))
+
+;;;; check
+(cl-defun vendle:check ()
+  (cl-mapc
+   (lambda (package)
+     (vendle:install-package package))
+   *vendle-package-list*))
 
 
 ;;;; register



;; commands
(cl-defun vendle-install ()
  "Install packages using `vendle:install-packages'"
  (interactive)
  (vendle:install-packages))

(cl-defun vendle-update ()
  (interactive)


;;;; install

(cl-defun vendle:install-package (package)
  (unless (or (cl-equalp 'local (vendle:package-type package))
              (file-exists-p (vendle:package-path package)))
