near/airsonic-ui
1
0
Fork 0
mirror of https://github.com/heyarne/airsonic-ui.git synced 2026-05-07 10:43:39 +02:00
Code Issues Projects Releases Wiki Activity

Add user notifications

Browse source
This commit is contained in:
Arne Schlüter 2018-06-11 15:47:39 +02:00
commit 68a96bc398
9 changed files with 140 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

23
test/cljs/airsonic_ui/events_test.cljs
View file

@ -43,3 +43,26 @@
(testing "When there's no previous login data"
(testing "remembering has no effect"
(is (nil? (events/try-remember-user {} [:_]))))))
(defn- first-notification [db]
(-> (:notifications db) vals first))
(deftest user-notifications
(testing "Should be able to display a message with an assigned level"
(is (= :error (:level (first-notification (events/show-notification {} [:_ :error "foo"])))))
(is (= :info (:level (first-notification (events/show-notification {} [:_ :info "some other message"]))))))
(testing "Should default to level :info"
(is (= :info (:level (first-notification (events/show-notification {} [:_ "and another one"]))))))
(testing "Should create a unique id for each message"
(let [state (->
{}
(events/show-notification [:_ :info "Something something"])
(events/show-notification [:_ :error "Something important"]))
ids (keys (:notifications state))]
(is (= (count ids) (count (set ids))))))
(testing "Should remove a message, given it's id"
(let [state (events/show-notification {} [:_ "This is a notification"])
id (-> (:notifications state)
keys
first)]
(is (empty? (:notifications (events/hide-notification state [:_ id])))))))

28
test/cljs/airsonic_ui/utils/api_test.cljs
View file

@ -9,7 +9,17 @@
(api/url server endpoint {}))
(def fixtures
{:default-url (url "http://localhost:8080" "ping")})
{:default-url (url "http://localhost:8080" "ping")
:responses {:error {:subsonic-response
{:error {:code 40
:message "Wrong username or password"}
:status "failed"
:version "1.15.0"}}}
:ok {:subsonic-response
{:scanStatus {:count 10326
:scanning false}
:status "ok"
:version "1.15.0"}}})
(deftest general-url-construction
(testing "Handles missing slashes"
@ -30,3 +40,19 @@
(is (true? (str/includes? (api/cover-url "http://server.tld" {} album -1) (str "id=" (:coverArt album))))))
(testing "Should scale an image to a given size"
(is (true? (str/includes? (api/cover-url "http://server.tld" {} album 48) "size=48"))))))
(deftest response-handling
(testing "Should unwrap responses"
(let [response (get-in fixtures [:responses :ok])]
(is (= (get-in response [:subsonic-response :scanStatus])
(api/unwrap-response response)))))
(testing "Should detect errors"
(is (true? (api/is-error? (get-in fixtures [:responses :error]))))
(is (false? (api/is-error? (get-in fixtures [:responses :ok])))))
(testing "Should throw an informative error when trying to unwrap an erroneous response"
(let [error-response (get-in fixtures [:responses :error])]
(is (thrown? ExceptionInfo (api/unwrap-response error-response)))
(try
(api/unwrap-response error-response)
(catch ExceptionInfo e
(= (:error error-response) (ex-data e)))))))