Fix erroneous WS subscription name for public TL.

2017-04-25 22:32:27 +02:00 · 2017-04-25 22:32:27 +02:00 · c72a9281df
commit c72a9281df
parent 1af985130f
1 changed files with 9 additions and 9 deletions
--- a/src/Mastodon.elm
+++ b/src/Mastodon.elm
@ -713,21 +713,21 @@ subscribeToWebSockets client streamType message =
    let
        type_ =
            case streamType of
-                UserStream ->
-                    "user"
+                GlobalPublicStream ->
+                    "public"

                LocalPublicStream ->
                    "public:local"

-                GlobalPublicStream ->
-                    "public:local"
+                UserStream ->
+                    "user"

        url =
-            (Util.replace "https" "wss" client.server)
-                ++ "/api/v1/streaming/?access_token="
-                ++ client.token
-                ++ "&stream="
-                ++ type_
+            encodeUrl
+                ((Util.replace "https:" "wss:" client.server) ++ "/api/v1/streaming/")
+                [ ( "access_token", client.token )
+                , ( "stream", type_ )
+                ]
    in
        WebSocket.listen url message