Commit d8acfee5 authored by Linus Tolke Y's avatar Linus Tolke Y

Fixed hanging on initial login, status-pers unread count.

parent c955706a
No preview for this file type
......@@ -429,6 +429,11 @@ Args: MEMBERSHIP-LIST CONF-STAT."
(setq lyskom-count-var 0)
(lyskom-traverse
membership membership-list
(let ((cs (cache-get-conf-stat (membership->conf-no membership))))
(and cs
(lyskom-time-greater (membership->last-time-read membership)
(conf-stat->last-written conf-stat))
(cache-del-conf-stat (membership->conf-no membership))))
(initiate-get-conf-stat 'main 'lyskom-status-pers-5
(membership->conf-no membership)
membership conf-stat)))
......
......@@ -106,7 +106,7 @@ Optional arguments: HOST, USERNAME and PASSWORD."
(goto-char (point-max))
(insert "\n" (format "%s" proc) "-----> " output)))
(cond
((string= output "LysKOM\n")
((string-match "^LysKOM\n" output)
(lyskom-init-parse)
(set-process-filter proc 'lyskom-filter)
(set-process-sentinel proc 'lyskom-sentinel)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment