From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/19687 Path: main.gmane.org!not-for-mail From: Shenghuo ZHU Newsgroups: gmane.emacs.gnus.general Subject: Re: escape-quoted Date: 04 Dec 1998 15:16:46 -0500 Organization: Computer Dept of U Rochester Sender: owner-ding@hpc.uh.edu Message-ID: <5bbtlj3bo1.fsf@brandy.cs.rochester.edu> References: <3.0.3.32.19981204093713.00b91540@exchange.parallax.co.uk> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 X-Trace: main.gmane.org 1035157991 12847 80.91.224.250 (20 Oct 2002 23:53:11 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 23:53:11 +0000 (UTC) Return-Path: Original-Received: from gizmo.hpc.uh.edu (gizmo.hpc.uh.edu [129.7.102.31]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id QAA03241 for ; Fri, 4 Dec 1998 16:20:48 -0500 (EST) Original-Received: from sina.hpc.uh.edu (lists@sina.hpc.uh.edu [129.7.3.5]) by gizmo.hpc.uh.edu (8.9.1/8.9.1) with ESMTP id PAA31812; Fri, 4 Dec 1998 15:07:24 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 04 Dec 1998 15:07:30 -0600 (CST) Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.7.3/8.7.3) with ESMTP id PAA06145 for ; Fri, 4 Dec 1998 15:07:19 -0600 (CST) Original-Received: from cayuga.cs.rochester.edu (cayuga.cs.rochester.edu [192.5.53.209]) by sclp3.sclp.com (8.8.5/8.8.5) with SMTP id QAA02823 for ; Fri, 4 Dec 1998 16:07:11 -0500 (EST) Original-Received: from slate.cs.rochester.edu (slate.cs.rochester.edu [192.5.53.101]) by cayuga.cs.rochester.edu (8.6.9/O) with ESMTP id PAA26114 for ; Fri, 4 Dec 1998 15:16:47 -0500 Original-Received: from brandy.cs.rochester.edu (brandy.cs.rochester.edu [192.5.53.199]) by slate.cs.rochester.edu (8.6.9/O) with ESMTP id PAA01418 for ; Fri, 4 Dec 1998 15:16:46 -0500 Original-Received: (from zsh@localhost) by brandy.cs.rochester.edu (SMI-8.6/N++) id PAA16988; Fri, 4 Dec 1998 15:16:46 -0500 Original-To: ding@gnus.org X-Attribution: ZSH X-Face: 'IF:e51ib'Qbl^(}l^&4-J`'P!@[4~O|&k#:@Gld#b/]oMq&`&FVY._3+b`mzp~Jeve~/#/ ERD!OTe<86UhyN=l`mrPY)M7_}`Ktt\K+58Z!hu7>qU,i.N7TotU[FYE(f1;}`g2xj!u*l`^&=Q!g{ *q|ddto|nkt"$r,K$[)"|6,elPH= GJ6Q User-Agent: Gnus/5.070063 (Pterodactyl Gnus v0.63) Emacs/20.3 Precedence: list X-Majordomo: 1.94.jlt7 Original-Lines: 40 Xref: main.gmane.org gmane.emacs.gnus.general:19687 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:19687 Fri Dec 4 12:13:12 1998 Shenghuo ZHU * message.el (message-draft-coding-system): Fix for XEmacs-NT. * mm-util.el (mm-find-charset-region): Ditto. -- Shenghuo :- patch ------------------------------ --- message.el 1998/12/04 17:06:13 1.1 +++ message.el 1998/12/04 19:28:32 @@ -879,8 +879,12 @@ "Coding system to encode outgoing mail.") (defvar message-draft-coding-system - (if (string-match "XEmacs\\|Lucid" emacs-version) - 'escape-quoted 'emacs-mule) + (cond + ((not (fboundp 'coding-system-p)) nil) + ((coding-system-p 'emacs-mule) 'emacs-mule) + ((coding-system-p 'escape-quoted) 'escape-quoted) + ((coding-system-p 'no-conversion) 'no-conversion) + (t nil)) "Coding system to compose mail.") (defvar message-default-charset 'iso-8859-1 --- mm-util.el 1998/12/04 17:12:48 1.1 +++ mm-util.el 1998/12/04 17:13:36 @@ -249,7 +249,8 @@ "Return a list of charsets in the region." (cond ((and (boundp 'enable-multibyte-characters) - enable-multibyte-characters) + enable-multibyte-characters + (fboundp 'find-charset-region)) (find-charset-region b e)) ((not (boundp 'current-language-environment)) (save-excursion