fixed bug in as-compute-service when passed credentials

This commit is contained in:
Hugo Duncan 2010-04-02 15:04:44 -04:00
parent 68080daee3
commit 3776354f59
1 changed files with 1 additions and 1 deletions

View File

@ -64,7 +64,7 @@ See http://code.google.com/p/jclouds for details."
(cond (cond
(compute-service? (first args)) (first args) (compute-service? (first args)) (first args)
(compute-context? (first args)) (.getComputeService (first args)) (compute-context? (first args)) (.getComputeService (first args))
:else (apply compute-context args))) :else (apply compute-service args)))
(def *compute*) (def *compute*)