Commit d3762650 authored by David Byers's avatar David Byers
Browse files

Performance fix and workaround for XEmacs time zone bug

Detailed changes:
> 2004-06-23  David Byers  <byers@lysator.liu.se>
>
> 	Make kom-join-all-conferences more responsive:
> 	* commands2.el (kom-leave-all-conferences): Update display after
> 	each conf.
> 	(kom-join-all-conferences): Same here.
>
> 	Improve startup performance:
> 	* vars.el.in (lyskom-fetch-membership-length): Changed default to
> 	100 and updated the documentation. We no longer fetch the map this
> 	way, and a large value cuts down on the number of calls the client
> 	has to make to the server.
>
> 2004-06-13  David Byers  <byers@lysator.liu.se>
>
> 	* utilities.el (lyskom-set-connection-time-format): Refuse to set
> 	UTC if encode-time is broken (i.e. XEmacs 21.4 under Windows).
>
parent fe0e5869
2004-06-23 David Byers <byers@lysator.liu.se>
Make kom-join-all-conferences more responsive:
* commands2.el (kom-leave-all-conferences): Update display after
each conf.
(kom-join-all-conferences): Same here.
Improve startup performance:
* vars.el.in (lyskom-fetch-membership-length): Changed default to
100 and updated the documentation. We no longer fetch the map this
way, and a large value cuts down on the number of calls the client
has to make to the server.
2004-06-13 David Byers <byers@lysator.liu.se>
* utilities.el (lyskom-set-connection-time-format): Refuse to set
UTC if encode-time is broken (i.e. XEmacs 21.4 under Windows).
2004-06-09 Ulrik Haugen <qha@lysator.liu.se>
* vars.el.in (kom-builtin-server-aliases): Added MysKOM.
......
......@@ -3387,7 +3387,8 @@ is probably not what you really want to do."
(not (lyskom-j-or-n-p (lyskom-format 'confirm-join
(car conf-nos))))))
(lyskom-add-member-by-no (car conf-nos) lyskom-pers-no
no-of-unread mship-type))
no-of-unread mship-type)
(sit-for 0))
(setq conf-nos (cdr conf-nos)))))
......@@ -3493,6 +3494,7 @@ that this command could take a very long time to complete."
t)
))
(sit-for 0)
(setq confs (cdr confs)))
))
......
......@@ -2209,6 +2209,12 @@ suitable for use as initial input in a magic minibuffer."
(defun lyskom-set-connection-time-format (val)
"Change protocol time format to UTC if VAL is non-nil."
;; Check for broken encode-time
(setq val (and val
(condition-case nil
(not (equal (encode-time 0 0 0 1 1 1970 0)
(encode-time 0 0 0 1 1 1970 -4)))
(error nil))))
(when (or (blocking-do 'set-connection-time-format val)
(null val))
(lyskom-traverse-buffer-hierarchy
......
......@@ -3846,13 +3846,8 @@ This is currently not used."
"Number of text-nos lyskom will fetch when fetching maps."
local)
(def-kom-var lyskom-fetch-membership-length 6
"Number of entries in the membership-list that is fetched at a time.
This should be optimized depending on how often you read LysKOM and
the activity in the first groups in you membership list.
Best performance is achieved if you, when logging in, always have an unread
article in one of the first lyskom-fetch-membership-length conferences.")
(def-kom-var lyskom-fetch-membership-length 100
"Number of entries in the membership-list that is fetched at a time.")
(def-kom-var lyskom-prefetch-limit 10
"Number of prefetch requests the client will try to keep going
......
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