         connectors-clause   (str/join " or " connectors-clauses)
         cimi-filter         (cimi-and policy connectors-clause)
         cimi-filter         (cimi-and cimi-filter (clause-cpu-ram-disk component))]
-    (log/info "the cimi-filter = " cimi-filter)
+    (log/debug "the cimi-filter = " cimi-filter)
     cimi-filter))
 
 (defn- service-offers-by-component-policy
   [user-connectors component]
-  (log/info "Fetching service offers by component policy")
   (fetch-service-offers (cimi-filter-policy user-connectors component)))
 
 (defn- place-rank-component

                      #(get-in % [:schema-org:descriptionVector :schema-org:disk])))
       first))

(defn- entity-to-price-with
  [service-offers connector-name]
  (->> service-offers
       (filter #(and (= (service-offer-currency-key %) "EUR")
                     (= (get-in % [:connector :href]) connector-name)))
       smallest-service-offer))


    [sixsq.slipstream.client.api.cimi :as cimi]))

(def service-offer-currency-key :schema-org:priceCurrency)
(def no-price -1)

(defn string-or-nil?
  [s]
