Fix tests

Author: ericdallo

src/eca/llm_providers/copilot.clj

@@ -4,6 +4,7 @@
    [eca.client-http :as client]
    [eca.config :as config]
    [eca.features.login :as f.login]
+   [eca.shared :refer [multi-str]]
    [hato.client :as http]))
 
 (def ^:private client-id "Iv1.b507a08c87ecfe98")
@@ -71,10 +72,11 @@
     (swap! db* assoc-in [:chats chat-id :login-provider] provider)
     (swap! db* assoc-in [:auth provider] {:step :login/waiting-user-confirmation
                                           :device-code device-code})
-    (send-msg! "First, make sure you have Copilot enabled in you Github account: https://github.com/settings/copilot/features")
-    (send-msg! (format "\nThen, open your browser at:\n\n%s\n\nAuthenticate using the code: `%s`\nThen type anything in the chat and send it to continue the authentication."
-                       url
-                       user-code))))
+    (send-msg! (multi-str
+                "First, make sure you have Copilot enabled in you Github account: https://github.com/settings/copilot/features"
+                (format "Then, open your browser at:\n\n%s\n\nAuthenticate using the code: `%s`\nThen type anything in the chat and send it to continue the authentication."
+                        url
+                        user-code)))))
 
 (defmethod f.login/login-step ["github-copilot" :login/waiting-user-confirmation] [{:keys [db* provider send-msg!] :as ctx}]
   (let [access-token (oauth-access-token (get-in @db* [:auth provider :device-code]))

test/eca/features/login_test.clj

@@ -56,7 +56,7 @@
 
       (testing "should proceed to the next step"
         (println @msg-log)
-        (is (re-find #"(?m)Open your browser at:\n\nhttps://mock.github.com/login/device\n\nAuthenticate using the code: `.+`\nThen type anything in the chat and send it to continue the authentication."
+        (is (re-find #"(?m)Then, open your browser at:\n\nhttps://mock.github.com/login/device\n\nAuthenticate using the code: `.+`\nThen type anything in the chat and send it to continue the authentication."
                      (last @msg-log)))
 
         (testing "state is update to reflect in-progress login"