diff options
| author | Andrew Innes | 1999-05-02 10:56:26 +0000 |
|---|---|---|
| committer | Andrew Innes | 1999-05-02 10:56:26 +0000 |
| commit | e16bf4949f124064fe5daba22e5618d89b6db2a9 (patch) | |
| tree | fca6b7dcb7030b0bff0fe1c483e2972b9fadf77e /src/msdos.c | |
| parent | 2c088c98358d6dd3dad92b02b249863b2a078bc4 (diff) | |
| download | emacs-e16bf4949f124064fe5daba22e5618d89b6db2a9.tar.gz emacs-e16bf4949f124064fe5daba22e5618d89b6db2a9.zip | |
(unibyte_display_via_language_environment):
Variable moved to xdisp.c.
(syms_of_msdos): Don't set up Lisp var here.
Diffstat (limited to 'src/msdos.c')
| -rw-r--r-- | src/msdos.c | 22 |
1 files changed, 5 insertions, 17 deletions
diff --git a/src/msdos.c b/src/msdos.c index c90e69dfd13..9bb5fd9e788 100644 --- a/src/msdos.c +++ b/src/msdos.c | |||
| @@ -356,9 +356,6 @@ static unsigned long screen_old_address = 0; | |||
| 356 | static unsigned short screen_virtual_segment = 0; | 356 | static unsigned short screen_virtual_segment = 0; |
| 357 | static unsigned short screen_virtual_offset = 0; | 357 | static unsigned short screen_virtual_offset = 0; |
| 358 | 358 | ||
| 359 | /* A flag to control how to display unibyte 8-bit character. */ | ||
| 360 | int unibyte_display_via_language_environment; | ||
| 361 | |||
| 362 | #if __DJGPP__ > 1 | 359 | #if __DJGPP__ > 1 |
| 363 | /* Update the screen from a part of relocated DOS/V screen buffer which | 360 | /* Update the screen from a part of relocated DOS/V screen buffer which |
| 364 | begins at OFFSET and includes COUNT characters. */ | 361 | begins at OFFSET and includes COUNT characters. */ |
| @@ -691,15 +688,15 @@ IT_write_glyphs (GLYPH *str, int str_len) | |||
| 691 | register int tlen = GLYPH_TABLE_LENGTH; | 688 | register int tlen = GLYPH_TABLE_LENGTH; |
| 692 | register Lisp_Object *tbase = GLYPH_TABLE_BASE; | 689 | register Lisp_Object *tbase = GLYPH_TABLE_BASE; |
| 693 | 690 | ||
| 694 | struct coding_system *coding = CODING_REQUIRE_ENCODING (&terminal_coding) | 691 | struct coding_system *coding = (CODING_REQUIRE_ENCODING (&terminal_coding) |
| 695 | ? &terminal_coding | 692 | ? &terminal_coding |
| 696 | : &safe_terminal_coding; | 693 | : &safe_terminal_coding); |
| 697 | 694 | ||
| 698 | /* Do we need to consider conversion of unibyte characters to | 695 | /* Do we need to consider conversion of unibyte characters to |
| 699 | multibyte? */ | 696 | multibyte? */ |
| 700 | int convert_unibyte_characters | 697 | int convert_unibyte_characters |
| 701 | = NILP (current_buffer->enable_multibyte_characters) | 698 | = (NILP (current_buffer->enable_multibyte_characters) |
| 702 | && unibyte_display_via_language_environment; | 699 | && unibyte_display_via_language_environment); |
| 703 | 700 | ||
| 704 | if (str_len == 0) return; | 701 | if (str_len == 0) return; |
| 705 | 702 | ||
| @@ -4007,15 +4004,6 @@ syms_of_msdos () | |||
| 4007 | Qforeground_color = intern ("foreground-color"); | 4004 | Qforeground_color = intern ("foreground-color"); |
| 4008 | staticpro (&Qforeground_color); | 4005 | staticpro (&Qforeground_color); |
| 4009 | 4006 | ||
| 4010 | DEFVAR_BOOL ("unibyte-display-via-language-environment", | ||
| 4011 | &unibyte_display_via_language_environment, | ||
| 4012 | "*Non-nil means display unibyte text according to language environment.\n\ | ||
| 4013 | Specifically this means that unibyte non-ASCII characters\n\ | ||
| 4014 | are displayed by converting them to the equivalent multibyte characters\n\ | ||
| 4015 | according to the current language environment. As a result, they are\n\ | ||
| 4016 | displayed according to the current codepage and display table."); | ||
| 4017 | unibyte_display_via_language_environment = 0; | ||
| 4018 | |||
| 4019 | DEFVAR_LISP ("dos-unsupported-char-glyph", &Vdos_unsupported_char_glyph, | 4007 | DEFVAR_LISP ("dos-unsupported-char-glyph", &Vdos_unsupported_char_glyph, |
| 4020 | "*Glyph to display instead of chars not supported by current codepage.\n\ | 4008 | "*Glyph to display instead of chars not supported by current codepage.\n\ |
| 4021 | 4009 | ||