fixed usage and added image name predicate

This commit is contained in:
Adrian Cole 2010-04-02 13:47:20 -07:00
parent 3776354f59
commit 5d68b3e820
1 changed files with 8 additions and 7 deletions

View File

@ -15,10 +15,11 @@ Here's an example of getting some compute configuration from rackspace:
(def compute (compute-context compute-name user password)) (def compute (compute-context compute-name user password))
(pprint (locations compute)) (with-compute-service [compute]
(pprint (images compute)) (pprint (locations))
(pprint (nodes compute)) (pprint (images))
(pprint (sizes compute)) (pprint (nodes))
(pprint (sizes)))
See http://code.google.com/p/jclouds for details." See http://code.google.com/p/jclouds for details."
(:use org.jclouds.core (:use org.jclouds.core
@ -253,7 +254,7 @@ See http://code.google.com/p/jclouds for details."
(concat (concat
(make-option-map option-fn-1arg (make-option-map option-fn-1arg
[:os-family :location-id :architecture :image-id :size-id [:os-family :location-id :architecture :image-id :size-id
:os-description-matches :image-version-matches :os-description-matches :image-version-matches :image-name-matches
:image-description-matches :min-cores :min-ram]) :image-description-matches :min-cores :min-ram])
(make-option-map option-option-fn-1arg (make-option-map option-option-fn-1arg
[:run-script :install-private-key :authorize-public-key :inbound-ports])))) [:run-script :install-private-key :authorize-public-key :inbound-ports]))))