Change: (ement-connect) Add content to SSO browser page

See #24.
alphapapa · Jul 5, 2023 · 8b830e0 · 8b830e0
1 parent 3c50f77
commit 8b830e0
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/ement.el b/ement.el
@@ -278,7 +278,12 @@ the port, e.g.
                                            "initial_device_display_name" initial-device-display-name)))
                          (ement-api session "login" :method 'post
                            :data (json-encode data)
-                           :then (apply-partially #'ement--login-callback session)))
+                           :then (apply-partially #'ement--login-callback session))
+                         (process-send-string process "HTTP/1.0 202 Accepted
+Content-Type: text/plain; charset=utf-8
+
+Ement: SSO login accepted; session token received.  Connecting to Matrix server.  (You may close this page.)")
+                         (process-send-eof process))
                      (delete-process sso-server-process)
                      (delete-process process))))
                 (sso-login ()