aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog8
-rw-r--r--lisp/net/rcirc.el4
2 files changed, 10 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1d63d52da50..b03b3e850d4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
12006-06-23 Daniel Brockman <daniel@brockman.se>
2
3 * net/rcirc.el (rcirc-default-user-full-name): Default to
4 `rcirc-default-user-name' instead of `rcirc-user-name' (which no
5 longer exists).
6 (rcirc-process-list): Check `buffer-live-p' before attempting to
7 switch to a buffer.
8
12006-06-23 Ryan Yeske <rcyeske@gmail.com> 92006-06-23 Ryan Yeske <rcyeske@gmail.com>
2 10
3 * net/rcirc.el (rcirc-mode): Fix initialization of coding systems 11 * net/rcirc.el (rcirc-mode): Fix initialization of coding systems
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 683d7c6f3c1..1f051ffa9f2 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -74,7 +74,7 @@
74 :group 'rcirc) 74 :group 'rcirc)
75 75
76(defcustom rcirc-default-user-full-name (if (string= (user-full-name) "") 76(defcustom rcirc-default-user-full-name (if (string= (user-full-name) "")
77 rcirc-user-name 77 rcirc-default-user-name
78 (user-full-name)) 78 (user-full-name))
79 "The full name sent to the server when connecting." 79 "The full name sent to the server when connecting."
80 :type 'string 80 :type 'string
@@ -469,7 +469,7 @@ Functions are called with PROCESS and SENTINEL arguments.")
469 "Return a list of rcirc processes." 469 "Return a list of rcirc processes."
470 (let (ps) 470 (let (ps)
471 (mapc (lambda (p) 471 (mapc (lambda (p)
472 (when (process-buffer p) 472 (when (buffer-live-p (process-buffer p))
473 (with-rcirc-process-buffer p 473 (with-rcirc-process-buffer p
474 (when (eq major-mode 'rcirc-mode) 474 (when (eq major-mode 'rcirc-mode)
475 (setq ps (cons p ps)))))) 475 (setq ps (cons p ps))))))