From 87ad2c90cc2bf2e8bcd348e411f72e442453eeb0 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 16 Mar 2001 11:01:53 +0000 Subject: [PATCH] (select-safe-coding-system): Fix typo: symbol-name -> symbol-value. --- lisp/international/mule-cmds.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index be151d8f0ef..efedd889f02 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -589,7 +589,7 @@ and TO is ignored." (let ((tail coding-category-list) preferred base) (while (and tail - (not (setq preferred (symbol-name (car tail))))) + (not (setq preferred (symbol-value (car tail))))) (setq tail (cdr tail))) (and (coding-system-p preferred) (setq base (coding-system-base preferred)) -- 2.39.2