# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 873110814 0
# Node ID 4c0174fcf26cde0ca4245547c06425e45236d3ea
# Parent  431753f747ea72d0f74a92b12e8b1d0351e20c94
(read-multilingual-string): Fix previous change.

diff -r 431753f747ea -r 4c0174fcf26c lisp/international/mule-cmds.el
--- a/lisp/international/mule-cmds.el	Mon Sep 01 10:44:31 1997 +0000
+++ b/lisp/international/mule-cmds.el	Mon Sep 01 10:46:54 1997 +0000
@@ -565,7 +565,7 @@
 	(or input-method
 	    default-input-method
 	    (read-input-method-name "Input method: " nil t)))
-  (if (and input-method (symbolp input-method)
+  (if (and input-method (symbolp input-method))
       (setq input-method (symbol-name input-method)))
   (let ((current-input-method input-method))
     (read-string prompt initial-input nil nil t)))