changeset 71440:fd07cc034d56

(rcirc-mode): Fix initialization of coding systems based on rcirc-coding-system-alist.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 23 Jun 2006 13:22:58 +0000
parents 6d007ba44d9b
children b0655175e0a4
files lisp/net/rcirc.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/net/rcirc.el	Fri Jun 23 13:17:44 2006 +0000
+++ b/lisp/net/rcirc.el	Fri Jun 23 13:22:58 2006 +0000
@@ -719,8 +719,8 @@
 	  (serv (if (consp (car i)) (cdar i) "")))
       (when (and (string-match chan (or target ""))
 		 (string-match serv (rcirc-server-name process)))
-	(setq rcirc-decode-coding-system (if (consp (cdr i)) (cadr i) i)
-	      rcirc-encode-coding-system (if (consp (cdr i)) (cddr i) i)))))
+	(setq rcirc-decode-coding-system (if (consp (cdr i)) (cadr i) (cdr i))
+	      rcirc-encode-coding-system (if (consp (cdr i)) (cddr i) (cdr i))))))
 
   ;; setup the prompt and markers
   (make-local-variable 'rcirc-prompt-start-marker)