# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1151068978 0
# Node ID fd07cc034d56b115d87e9e61f69e2f25ab07fcad
# Parent  6d007ba44d9bc6f1b108210e1fb34658c925c8b7
(rcirc-mode): Fix initialization of coding systems based on
rcirc-coding-system-alist.

diff -r 6d007ba44d9b -r fd07cc034d56 lisp/net/rcirc.el
--- 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)