From 888c470f9751ba81b4dd9f8d87c7c0300f78f409 Mon Sep 17 00:00:00 2001 From: tomo Date: Wed, 30 Jun 1999 04:36:53 +0000 Subject: [PATCH] (read-coding-system): Fixed. --- lisp/minibuf.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/minibuf.el b/lisp/minibuf.el index 6e8b6cd..0061576 100644 --- a/lisp/minibuf.el +++ b/lisp/minibuf.el @@ -2117,8 +2117,8 @@ On mswindows devices, this uses `mswindows-color-list'." "Read a coding-system (or nil) from the minibuffer. Prompting with string PROMPT. If the user enters null input, return second argument DEFAULT-CODING-SYSTEM." - (completing-read prompt obarray 'find-coding-system t nil nil - default-coding-system)) + (intern (completing-read prompt obarray 'find-coding-system t nil nil + default-coding-system))) (defun read-non-nil-coding-system (prompt) "Read a non-nil coding-system from the minibuffer. -- 1.7.10.4