diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-04-08 22:53:31 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-04-08 22:53:31 +0000 |
| commit | 33182c8a9e8515a8235b562176c75bac3ef9c0d0 (patch) | |
| tree | 0e0da3529b5b9aa5120d6d7cd347cb9e928a9996 /lisp/international/encoded-kb.el | |
| parent | f33c1f4c5ad4852d5c3088612733a0ff5e2971cd (diff) | |
| download | emacs-33182c8a9e8515a8235b562176c75bac3ef9c0d0.tar.gz | |
Fix up indentation.
Diffstat (limited to 'lisp/international/encoded-kb.el')
| -rw-r--r-- | lisp/international/encoded-kb.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el index c90c1650810..46b7093da61 100644 --- a/lisp/international/encoded-kb.el +++ b/lisp/international/encoded-kb.el @@ -196,14 +196,14 @@ The following key sequence may cause multilingual text insertion." ((= last-command-char ?\217) ; SS3 (Single Shift 3) (aset encoded-kbd-iso2022-invocations 2 3)) (t - (let* ((charset (aref encoded-kbd-iso2022-designations - (or (aref encoded-kbd-iso2022-invocations 2) - (aref encoded-kbd-iso2022-invocations 1)))) - (char (if (= (charset-dimension charset) 1) - (make-char charset last-command-char) + (let* ((charset (aref encoded-kbd-iso2022-designations + (or (aref encoded-kbd-iso2022-invocations 2) + (aref encoded-kbd-iso2022-invocations 1)))) + (char (if (= (charset-dimension charset) 1) + (make-char charset last-command-char) (make-char charset last-command-char (read-char-exclusive))))) - (aset encoded-kbd-iso2022-invocations 2 nil) + (aset encoded-kbd-iso2022-invocations 2 nil) (setq unread-command-events (cons char unread-command-events)))))) (defun encoded-kbd-self-insert-sjis () |