diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/international/mule-cmds.el | 4 | ||||
-rw-r--r-- | lisp/term/w32console.el | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 16c1003960a..248c89c40fc 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -2731,9 +2731,9 @@ See also `locale-charset-language-names', `locale-language-names', (set-terminal-coding-system 'utf-8) (set-keyboard-coding-system 'utf-8))) - ;; If curved quotes don't work, display straight ASCII approximations. + ;; If curved quotes don't work, display ASCII approximations. (unless frame - (dolist (char-repl '((?‘ . [?\']) (?’ . [?\']) (?“ . [?\"]) (?” . [?\"]))) + (dolist (char-repl '((?‘ . [?\`]) (?’ . [?\']) (?“ . [?\"]) (?” . [?\"]))) (when (not (char-displayable-p (car char-repl))) (or standard-display-table (setq standard-display-table (make-display-table))) diff --git a/lisp/term/w32console.el b/lisp/term/w32console.el index 29ab2f16e1c..2df137839d0 100644 --- a/lisp/term/w32console.el +++ b/lisp/term/w32console.el @@ -69,7 +69,7 @@ ;; Since we changed the terminal encoding, we need to repeat ;; the test for Unicode quotes being displayable. (dolist (char-repl - '((?‘ . [?\']) (?’ . [?\']) (?“ . [?\"]) (?” . [?\"]))) + '((?‘ . [?\`]) (?’ . [?\']) (?“ . [?\"]) (?” . [?\"]))) (when (not (char-displayable-p (car char-repl))) (or standard-display-table (setq standard-display-table (make-display-table))) |