diff options
| author | Stefan Monnier | 2002-04-08 22:53:31 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2002-04-08 22:53:31 +0000 |
| commit | 33182c8a9e8515a8235b562176c75bac3ef9c0d0 (patch) | |
| tree | 0e0da3529b5b9aa5120d6d7cd347cb9e928a9996 | |
| parent | f33c1f4c5ad4852d5c3088612733a0ff5e2971cd (diff) | |
| download | emacs-33182c8a9e8515a8235b562176c75bac3ef9c0d0.tar.gz emacs-33182c8a9e8515a8235b562176c75bac3ef9c0d0.zip | |
Fix up indentation.
| -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." | |||
| 196 | ((= last-command-char ?\217) ; SS3 (Single Shift 3) | 196 | ((= last-command-char ?\217) ; SS3 (Single Shift 3) |
| 197 | (aset encoded-kbd-iso2022-invocations 2 3)) | 197 | (aset encoded-kbd-iso2022-invocations 2 3)) |
| 198 | (t | 198 | (t |
| 199 | (let* ((charset (aref encoded-kbd-iso2022-designations | 199 | (let* ((charset (aref encoded-kbd-iso2022-designations |
| 200 | (or (aref encoded-kbd-iso2022-invocations 2) | 200 | (or (aref encoded-kbd-iso2022-invocations 2) |
| 201 | (aref encoded-kbd-iso2022-invocations 1)))) | 201 | (aref encoded-kbd-iso2022-invocations 1)))) |
| 202 | (char (if (= (charset-dimension charset) 1) | 202 | (char (if (= (charset-dimension charset) 1) |
| 203 | (make-char charset last-command-char) | 203 | (make-char charset last-command-char) |
| 204 | (make-char charset last-command-char | 204 | (make-char charset last-command-char |
| 205 | (read-char-exclusive))))) | 205 | (read-char-exclusive))))) |
| 206 | (aset encoded-kbd-iso2022-invocations 2 nil) | 206 | (aset encoded-kbd-iso2022-invocations 2 nil) |
| 207 | (setq unread-command-events (cons char unread-command-events)))))) | 207 | (setq unread-command-events (cons char unread-command-events)))))) |
| 208 | 208 | ||
| 209 | (defun encoded-kbd-self-insert-sjis () | 209 | (defun encoded-kbd-self-insert-sjis () |