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

who-info-buffer bug-fixes

parent e76a4d7b
No preview for this file type
......@@ -198,6 +198,8 @@ otherwise return nil"
"Sets the cache of who-info items."
(setq lyskom-who-info-cache (list 'WHO-INFO-LIST))
(lyskom-save-excursion
(setq lyskom-who-info-buffer
(get-buffer-create (concat (buffer-name) "-who")))
(set-buffer lyskom-who-info-buffer)
(erase-buffer))
(mapcar 'cache-add-who-info
......
......@@ -104,8 +104,6 @@ Optional arguments: HOST, USERNAME and PASSWORD."
(goto-char (point-max))
(insert "-----> " output " <-----\n"))
(set-buffer (process-buffer proc))))
(setq lyskom-who-info-buffer
(get-buffer-create (concat (buffer-name) "-who")))
(cond
((string= output "LysKOM\n")
(lyskom-init-parse)
......@@ -508,7 +506,6 @@ Entry to this mode runs lyskom-mode-hook."
(replies-buffer lyskom-unparsed-buffer)
(replies-marker lyskom-unparsed-marker)
(server-info lyskom-server-info)
(who-buffer lyskom-who-info-buffer)
(default-password lyskom-default-password))
(kill-all-local-variables)
(make-local-variable 'lyskom-default-password)
......@@ -529,6 +526,7 @@ Entry to this mode runs lyskom-mode-hook."
(make-local-variable 'lyskom-server-info)
(make-local-variable 'lyskom-who-info-cache)
(make-local-variable 'lyskom-who-info-buffer)
(make-local-variable 'lyskom-who-info-buffer-is-on)
(make-local-variable 'lyskom-prioritize-buffer)
(make-local-variable 'lyskom-marked-text-cache)
(make-local-variable 'lyskom-is-parsing)
......@@ -573,7 +571,6 @@ Entry to this mode runs lyskom-mode-hook."
(setq lyskom-unparsed-buffer replies-buffer)
(setq lyskom-unparsed-marker replies-marker)
(setq lyskom-server-info server-info)
(setq lyskom-who-info-buffer who-buffer)
(setq lyskom-do-when-done (cons kom-do-when-done kom-do-when-done))
(setq lyskom-output-queue (lyskom-queue-create))
(lyskom-set-mode-line (lyskom-get-string 'not-present-anywhere))))
......@@ -304,7 +304,7 @@ different packets.")
(defvar lyskom-who-info-buffer nil
"Buffer for the who info presentation.")
(defvar lyskom-who-info-buffer-is-on nil
(defvar lyskom-who-info-buffer-is-on t
"Says wether we are collecting who-information or not.")
......
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