From b121ef10f500c0377c2ce665e8ccd8b97a6aedfd Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Thu, 27 Nov 2014 01:33:09 +0000 Subject: Gnus: fix XEmacs compilation --- lisp/gnus/message.el | 18 +++++++++++------- 1 file changed, 11 insertions(+), 7 deletions(-) (limited to 'lisp/gnus/message.el') diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 0af47843d46..c1322154f19 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -1756,13 +1756,17 @@ no, only reply back to the author." :type '(radio (const :format "%v " nil) (string :format "FQDN: %v"))) -(defcustom message-use-idna (and (condition-case nil (require 'idna) - (file-error)) - (mm-coding-system-p 'utf-8) - (executable-find idna-program) - (string= (idna-to-ascii "räksmörgås") - "xn--rksmrgs-5wao1o") - t) +(defcustom message-use-idna + (and (or (mm-coding-system-p 'utf-8) + (condition-case nil + (let (mucs-ignore-version-incompatibilities) + (require 'un-define)) + (error))) + (condition-case nil (require 'idna) (file-error)) + idna-program + (executable-find idna-program) + (string= (idna-to-ascii "räksmörgås") "xn--rksmrgs-5wao1o") + t) "Whether to encode non-ASCII in domain names into ASCII according to IDNA. GNU Libidn, and in particular the elisp package \"idna.el\" and the external program \"idn\", must be installed for this -- cgit v1.2.1