diff options
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/w32console.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/term/w32console.el b/lisp/term/w32console.el index 2df137839d0..58856858502 100644 --- a/lisp/term/w32console.el +++ b/lisp/term/w32console.el | |||
| @@ -68,12 +68,7 @@ | |||
| 68 | (if oem-o-cs-p oem-code-page-output-coding oem-code-page-coding)) | 68 | (if oem-o-cs-p oem-code-page-output-coding oem-code-page-coding)) |
| 69 | ;; Since we changed the terminal encoding, we need to repeat | 69 | ;; Since we changed the terminal encoding, we need to repeat |
| 70 | ;; the test for Unicode quotes being displayable. | 70 | ;; the test for Unicode quotes being displayable. |
| 71 | (dolist (char-repl | 71 | (startup--setup-quote-display))) |
| 72 | '((?‘ . [?\`]) (?’ . [?\']) (?“ . [?\"]) (?” . [?\"]))) | ||
| 73 | (when (not (char-displayable-p (car char-repl))) | ||
| 74 | (or standard-display-table | ||
| 75 | (setq standard-display-table (make-display-table))) | ||
| 76 | (aset standard-display-table (car char-repl) (cdr char-repl)))))) | ||
| 77 | (let* ((colors w32-tty-standard-colors) | 72 | (let* ((colors w32-tty-standard-colors) |
| 78 | (color (car colors))) | 73 | (color (car colors))) |
| 79 | (tty-color-clear) | 74 | (tty-color-clear) |