Fix dumb error leading to national keys not working on ttys.

* lisp/international/encoded-kb.el (encoded-kbd-setup-display): Fix
  broken condition before set-input-mode.

git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-387

1 files changed, 3 insertions, 3 deletions

diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el
index b5394435e80..9220970f5bd 100644
--- a/lisp/international/encoded-kb.el
+++ b/lisp/international/encoded-kb.el
@@ -276,12 +276,12 @@ DISPLAY may be a display id, a frame, or nil for the selected frame's display."
                   result)
               (set-keymap-parent keymap (terminal-local-value 'local-key-translation-map frame))
               (set-terminal-local-value 'local-key-translation-map frame keymap)
-              (or (terminal-parameter nil 'encoded-kbd-saved-input-mode)
-                  (set-terminal-parameter nil 'encoded-kbd-saved-input-mode cim))
+              (unless (terminal-parameter nil 'encoded-kbd-saved-input-mode)
+                (set-terminal-parameter nil 'encoded-kbd-saved-input-mode cim))
               (setq result (and coding (encoded-kbd-setup-keymap keymap coding)))
               (if result
                   (when (and (eq result 8)
-                             (not (memq (nth 2 cim) '(t nil))))
+                             (memq (nth 2 cim) '(t nil)))
                     (set-input-mode
                      (nth 0 cim)
                      (nth 1 cim)