(describe-coding-system): Describe coding systems of type 5, raw-text.

ca6e03c2 · Richard M. Stallman · 89752145 · ca6e03c2
Commit ca6e03c2 authored Sep 11, 1997 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 1 deletion

lisp/international/mule-diag.el lisp/international/mule-diag.el +3 -1

No files found.
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -186,7 +186,9 @@ but contains full information about each character sets."
 		 (princ " (Big5)"))
 		((eq type 4)
 		 (princ " (do conversion by CCL program)"))
-		(t (princ "invalid coding-system."))))
+		((eq type 5)
+		 (princ " (text with random binary characters)"))
+		(t (princ ": invalid coding-system."))))
 	(princ "\nEOL type:\n  ")
 	(let ((eol-type (coding-system-eol-type coding-system)))
 	  (cond ((vectorp eol-type)