diff options
| author | Eli Zaretskii | 1999-06-14 15:10:14 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 1999-06-14 15:10:14 +0000 |
| commit | f53c8bb28dd0c81851cf97751023d3160b6187f9 (patch) | |
| tree | 3bc6a11ff962676d8b4c116ee62f4523d0112d6f | |
| parent | 2d1cc7d91e06db645d4651db0dc400dda244fea9 (diff) | |
| download | emacs-f53c8bb28dd0c81851cf97751023d3160b6187f9.tar.gz emacs-f53c8bb28dd0c81851cf97751023d3160b6187f9.zip | |
(IT-display-table-setup): Do not remap \222 to
the ASCII apostrophe, as most DOS codepages have some other glyph
there.
| -rw-r--r-- | lisp/term/internal.el | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lisp/term/internal.el b/lisp/term/internal.el index c0ec236db4e..5a0ffe29bcc 100644 --- a/lisp/term/internal.el +++ b/lisp/term/internal.el | |||
| @@ -204,8 +204,8 @@ terminal which does not have corresponding glyphs built into the | |||
| 204 | installed codepage.") | 204 | installed codepage.") |
| 205 | 205 | ||
| 206 | (defun IT-display-table-setup (codepage &optional table) | 206 | (defun IT-display-table-setup (codepage &optional table) |
| 207 | "Set up display table TABLE for a DOS terminal which supports a | 207 | "Set up display table TABLE for a DOS terminal which supports |
| 208 | glyphs built into the current codepage CODEPAGE. | 208 | glyphs built into the codepage CODEPAGE. |
| 209 | 209 | ||
| 210 | If TABLE is nil or omitted, `standard-display-table' is used." | 210 | If TABLE is nil or omitted, `standard-display-table' is used." |
| 211 | (let* ((surrogates IT-character-translations) | 211 | (let* ((surrogates IT-character-translations) |
| @@ -243,11 +243,7 @@ If TABLE is nil or omitted, `standard-display-table' is used." | |||
| 243 | (if (> (length glyph) 1) (concat "{" glyph "}") | 243 | (if (> (length glyph) 1) (concat "{" glyph "}") |
| 244 | glyph))))) | 244 | glyph))))) |
| 245 | (setq i (1+ i)))) | 245 | (setq i (1+ i)))) |
| 246 | (setq surrogates (cdr surrogates))) | 246 | (setq surrogates (cdr surrogates))))) |
| 247 | ;; Most Windows programs send out apostrophe's as \222. Most DOS | ||
| 248 | ;; fonts contain a different character at that position. Map it | ||
| 249 | ;; to the ASCII apostrophe. | ||
| 250 | (aset standard-display-table 146 [39]))) | ||
| 251 | 247 | ||
| 252 | (defun dos-cpNNN-setup (codepage) | 248 | (defun dos-cpNNN-setup (codepage) |
| 253 | "Set up the MULE environment using the DOS codepage CODEPAGE. | 249 | "Set up the MULE environment using the DOS codepage CODEPAGE. |