# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 903085368 0
# Node ID 2a8dbf5b77a81bc7d0a91dcd392927692a4354c9
# Parent  d4ab4affb26d4ae3237bec0568a1bf4587fb5c7a
(select-safe-coding-system): If default-coding-system is no-conversion,
return that; it is always safe.

diff -r d4ab4affb26d -r 2a8dbf5b77a8 lisp/international/mule-cmds.el
--- 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)))