mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 08:11:05 -08:00
Code Issues Projects Releases Wiki Activity

(display_text_line): Convert unibyte char to multibyte

Browse source 
if unibyte_display_via_language_environment is set.
(unibyte_display_via_language_environment):
Variable moved from xfns.c and elsewhere.
(syms_of_xfns): Set up Lisp var.
This commit is contained in:
Andrew Innes 1999-05-02 10:51:03 +00:00
parent a5a7d30fe9
commit 7bbe686fb2
1 changed files with 18 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

18
src/xdisp.c
View file

@ -112,6 +112,9 @@ char *previous_echo_glyphs;
/* Nonzero means truncate lines in all windows less wide than the frame */
int truncate_partial_width_windows;
/* A flag to control how to display unibyte 8-bit character. */
int unibyte_display_via_language_environment;
/* Nonzero means we have more than one non-minibuffer-only frame.
Not guaranteed to be accurate except while parsing frame-title-format. */
int multiple_frames;
@ -3825,6 +3828,12 @@ display_text_line (w, start, start_byte, vpos, hpos, taboffset, ovstr_done)
by octal form. */
int remaining_bytes = len;
if (unibyte_display_via_language_environment
&& SINGLE_BYTE_CHAR_P (c)
&& (c >= 0240
|| (c >= 0200 && !NILP (Vnonascii_translation_table))))
c = unibyte_char_to_multibyte (c);
if (c >= 0400 && CHAR_VALID_P (c, 0))
{
/* C is a multibyte character. */
@ -5597,6 +5606,15 @@ is not valid when these functions are called.");
"*Number of characters of overlap when scrolling a one-line window.\n\
This commonly affects the minibuffer window, hence the name of the variable.");
minibuffer_scroll_overlap = 20;
DEFVAR_BOOL ("unibyte-display-via-language-environment",
&unibyte_display_via_language_environment,
"*Non-nil means display unibyte text according to language environment.\n\
Specifically this means that unibyte non-ASCII characters\n\
are displayed by converting them to the equivalent multibyte characters\n\
according to the current language environment. As a result, they are\n\
displayed according to the current fontset.");
unibyte_display_via_language_environment = 0;
}
/* initialize the window system */