branch: externals/ement
commit 804dbcd1b02f9c95d4c2d1ea06972d1ed9fdac8a
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>
Fix: (ement-connect) Cleanup timer
---
ement.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/ement.el b/ement.el
index d3ae724272..52d3d28b31 100644
--- a/ement.el
+++ b/ement.el
@@ -292,7 +292,9 @@ Ement: SSO login accepted; session token received.
Connecting to Matrix server.
:name "ement-sso" :family 'ipv4 :host 'local
:service ement-sso-server-port
:filter #'sso-filter :server t :noquery t))
;; Kill server after 2 minutes in case of problems.
- (run-at-time 120 nil #'delete-process
sso-server-process)
+ (run-at-time 120 nil (lambda ()
+ (when (process-live-p
sso-server-process)
+ (delete-process
sso-server-process))))
(funcall browse-url-secondary-browser-function
(concat (ement-server-uri-prefix
(ement-session-server session))
"/_matrix/client/r0/login/sso/redirect?redirectUrl=http://localhost:";
