 (facts "it fetches projects"
        (fact "with authentication"
              (subject/fetch-tray {:url valid-url :username "a-user" :password "encrypted-password"}) => (contains (list (contains {:name       "project-1"
-                                                                                                                                   :prognosis  :sick
-                                                                                                                                   :project-id anything})))
+                                                                                                                                   :prognosis  :sick})))
              (provided
                (parser/get-projects ..stream.. anything) => [{:name "project-1" :prognosis :sick}]
                (crypt/decrypt "encrypted-password") => password

                      (subject/fetch-interesting anything) => irrelevant)))

       (fact "handles no tray id being given"
             (subject/get-interesting [{:included ["project"] :url valid-url}]) => (list {:tray-id nil :project-id "project" :prognosis :sick})
             (provided
               (subject/fetch-tray anything) => [{:web-url "project" :prognosis :sick}])))



       (fact "without authentication if blank username and password"
             (subject/fetch-tray {:url valid-url :username "" :password ""}) => (contains (list (contains {:name       "project-1"
                                                                                                           :prognosis  :sick})))
             (provided
               (parser/get-projects ..stream.. anything) => [{:name "project-1" :prognosis :sick}]
               (http/http-get valid-url nil) => ..stream..
