Mercurial > emacs
diff lisp/gnus/mm-util.el @ 104830:79c2323377ac
Use default-value rather than default-enable-multibyte-characters.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Thu, 03 Sep 2009 07:26:31 +0000 |
| parents | 73bff1db57b6 |
| children | 629a32caa79e |
line wrap: on
line diff
--- a/lisp/gnus/mm-util.el Thu Sep 03 07:20:50 2009 +0000 +++ b/lisp/gnus/mm-util.el Thu Sep 03 07:26:31 2009 +0000 @@ -1,7 +1,7 @@ ;;; mm-util.el --- Utility functions for Mule and low level things -;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, +;; 2007, 2008, 2009 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> ;; MORIOKA Tomohiko <morioka@jaist.ac.jp> @@ -900,8 +900,8 @@ (eval-and-compile (defvar mm-emacs-mule (and (not (featurep 'xemacs)) - (boundp 'default-enable-multibyte-characters) - default-enable-multibyte-characters + (boundp 'enable-multibyte-characters) + (default-value 'enable-multibyte-characters) (fboundp 'set-buffer-multibyte)) "True in Emacs with Mule.") @@ -1013,8 +1013,8 @@ "Return non-nil if the session is multibyte. This affects whether coding conversion should be attempted generally." (if (featurep 'mule) - (if (boundp 'default-enable-multibyte-characters) - default-enable-multibyte-characters + (if (boundp 'enable-multibyte-characters) + (default-value 'enable-multibyte-characters) t))) (defun mm-iso-8859-x-to-15-region (&optional b e)