Commit d6cd7ca3 authored by Linus Tolke Y's avatar Linus Tolke Y
Browse files

ending fetching of first thing

parent e881bb5f
Wed Aug 12 06:35:09 1992 Linus Tolke Y (linus@robin)
* startup.el (lyskom-fetch-until-we-have-unread): Bugfix, it is
now possible to login without unread and get the default prompt.
Tue Aug 4 08:07:14 1992 Linus Tolke Y (linus@robin)
* reading.el (lyskom-enter-map-in-to-do-list): 0 is removed, not
......
......@@ -346,7 +346,8 @@ Information required for this:
(initiate-get-part-of-membership 'main 'lyskom-start-anew-login-3
lyskom-pers-no
lyskom-membership-is-read
lyskom-fetch-membership-length)))
lyskom-fetch-membership-length)
(setq lyskom-membership-is-read t)))
(let ((reverse (reverse lyskom-membership)))
(while reverse
(lyskom-prefetch-conf (membership->conf-no (car reverse)))
......@@ -392,7 +393,7 @@ If not, fetch next conf-stat from REST-MEMBERSHIPLIST."
(defun lyskom-decide-unread-map (map conf)
"Enters this map in the lyskom-to-do-list and returns to lyskom-start-anew-login-3."
(lyskom-enter-map-in-to-do-list map conf)
(lyskom-start-anew-login-3 'cont))
(lyskom-fetch-until-we-have-an-unread))
(defun lyskom-print-name (conf-stat)
......
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