Commit 9e881545 authored by Christer Ekholm's avatar Christer Ekholm
Browse files

Fixed kom-list-clients to match the doc-string.

Handle prefix-argument the way the doc-string says.
parent 07a26a30
2014-07-02 Christer Ekholm <>
* commands1.el (kom-list-clients): Fixed the handling of prefix
argument to match the doc-string.
2014-06-26 Christer Ekholm <>
* buffers.el (lyskom-remove-buffer-from-lists): Use
......@@ -3037,8 +3037,9 @@ nonzero prefix argument ARG, list both visible and invisible sessions
who have been active in the last -ARG minutes. With a negative zero
prefix argument \(C-u -), list all sessions."
(interactive "P")
(let* ((want-invisible (if prefix t nil))
(who-info-list (blocking-do 'who-is-on-dynamic t want-invisible nil))
(let* ((want-invisible (or (eq '- prefix) (and (numberp prefix) (< prefix 0))))
(who-info-list (blocking-do 'who-is-on-dynamic t want-invisible
(if (numberp prefix) (* (abs prefix) 60) nil)))
(who-list (sort (listify-vector who-info-list)
(lambda (who1 who2)
......@@ -3090,10 +3091,15 @@ prefix argument \(C-u -), list all sessions."
(lyskom-insert (concat (make-string (- (lyskom-window-width) 2) ?-)
(lyskom-insert (lyskom-format (if want-invisible
'total-visible-users) total-users
(if (numberp prefix)
(if (numberp prefix)
(lyskom-format-insert "%#1D\n"
'get-time nil
Supports Markdown
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