[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Erc-discuss] nil target bug in erc-coding-system-for-target
From: |
It's me FKtPp ;) |
Subject: |
[Erc-discuss] nil target bug in erc-coding-system-for-target |
Date: |
Wed, 02 Aug 2006 21:16:15 +0800 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (berkeley-unix) |
This is the patch
diff -c /home/fktpp/emacs/lisp/erc/erc-backend.el
/home/fktpp/emacs/lisp/erc/erc-backend.el.\~1.3.\~
*** /home/fktpp/emacs/lisp/erc/erc-backend.el Wed Aug 2 18:51:30 2006
--- /home/fktpp/emacs/lisp/erc/erc-backend.el.~1.3.~ Sun Jul 23 17:28:56 2006
***************
*** 563,574 ****
"Return the coding system or cons cell appropriate for TARGET.
This is determined via `erc-encoding-coding-alist' or
`erc-server-coding-system'."
! (or (when target
! (let ((case-fold-search t))
! (catch 'match
! (dolist (pat erc-encoding-coding-alist)
! (when (string-match (car pat) target)
! (throw 'match (cdr pat)))))))
(and (functionp erc-server-coding-system)
(funcall erc-server-coding-system))
erc-server-coding-system))
--- 563,573 ----
"Return the coding system or cons cell appropriate for TARGET.
This is determined via `erc-encoding-coding-alist' or
`erc-server-coding-system'."
! (or (let ((case-fold-search t))
! (catch 'match
! (dolist (pat erc-encoding-coding-alist)
! (when (string-match (car pat) target)
! (throw 'match (cdr pat))))))
(and (functionp erc-server-coding-system)
(funcall erc-server-coding-system))
erc-server-coding-system))
- [Erc-discuss] nil target bug in erc-coding-system-for-target,
It's me FKtPp ;) <=