(rcirc-default-user-full-name): Default to `rcirc-default-user-name' instead
of `rcirc-user-name' (which no longer exists). (rcirc-process-list): Check `buffer-live-p' before attempting to switch to a buffer.
This commit is contained in:
parent
aac5d1fdce
commit
18aa2c90a0
2 changed files with 10 additions and 2 deletions
|
@ -1,3 +1,11 @@
|
|||
2006-06-23 Daniel Brockman <daniel@brockman.se>
|
||||
|
||||
* net/rcirc.el (rcirc-default-user-full-name): Default to
|
||||
`rcirc-default-user-name' instead of `rcirc-user-name' (which no
|
||||
longer exists).
|
||||
(rcirc-process-list): Check `buffer-live-p' before attempting to
|
||||
switch to a buffer.
|
||||
|
||||
2006-06-23 Ryan Yeske <rcyeske@gmail.com>
|
||||
|
||||
* net/rcirc.el (rcirc-mode): Fix initialization of coding systems
|
||||
|
|
|
@ -74,7 +74,7 @@
|
|||
:group 'rcirc)
|
||||
|
||||
(defcustom rcirc-default-user-full-name (if (string= (user-full-name) "")
|
||||
rcirc-user-name
|
||||
rcirc-default-user-name
|
||||
(user-full-name))
|
||||
"The full name sent to the server when connecting."
|
||||
:type 'string
|
||||
|
@ -469,7 +469,7 @@ Functions are called with PROCESS and SENTINEL arguments.")
|
|||
"Return a list of rcirc processes."
|
||||
(let (ps)
|
||||
(mapc (lambda (p)
|
||||
(when (process-buffer p)
|
||||
(when (buffer-live-p (process-buffer p))
|
||||
(with-rcirc-process-buffer p
|
||||
(when (eq major-mode 'rcirc-mode)
|
||||
(setq ps (cons p ps))))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue