* lpath.el: Fbind string-as-multibyte for XEmacs.

[gnus] / lisp / utf7.el

diff --git a/lisp/utf7.el b/lisp/utf7.el
index d1eb6ee..a1b7fdc 100644 (file)
--- a/lisp/utf7.el
+++ b/lisp/utf7.el
@@ -1,7 +1,7 @@
 ;;; utf7.el --- UTF-7 encoding/decoding for Emacs   -*-coding: iso-8859-1;-*-
 
 ;; Copyright (C) 1999, 2000, 2002, 2003, 2004,
-;;   2005 Free Software Foundation, Inc.
+;;   2005, 2006 Free Software Foundation, Inc.
 
 ;; Author: Jon K Hellan <hellan@acm.org>
 ;; Maintainer: bugs@gnus.org
@@ -80,7 +80,7 @@
 (defconst utf7-utf-16-coding-system
   (cond ((mm-coding-system-p 'utf-16-be-no-signature) ; Mule-UCS
         'utf-16-be-no-signature)
-       ((and (mm-coding-system-p 'utf-16-be) ; Emacs 22.1
+       ((and (mm-coding-system-p 'utf-16-be) ; Emacs 21.3, Emacs 22
              ;; Avoid versions with BOM.
              (= 2 (length (encode-coding-string "a" 'utf-16-be))))
         'utf-16-be)