Mercurial > emacs

diff lisp/international/mule-cmds.el @ 23021:2a8dbf5b77a8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(select-safe-coding-system): If default-coding-system is no-conversion, return that; it is always safe.
author Richard M. Stallman <rms@gnu.org>
date Fri, 14 Aug 1998 09:02:48 +0000
parents b5c383369b40
children 5e2bc240edfc
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Fri Aug 14 08:58:00 1998 +0000
+++ b/lisp/international/mule-cmds.el	Fri Aug 14 09:02:48 1998 +0000
@@ -378,6 +378,7 @@
 		     (find-charset-region from to)))
 	 (safe-coding-systems (find-coding-systems-for-charsets charsets)))
     (if (or (eq (car safe-coding-systems) 'undecided)
+	    (eq default-coding-system 'no-conversion)
 	    (and default-coding-system
 		 (memq (coding-system-base default-coding-system)
 		       safe-coding-systems)))