From f7ba1f608cfe25544252ed49f8d646f88d350a69 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Wed, 3 Mar 2004 23:52:54 +0000 Subject: [PATCH] (init_buffer_once): Adjusted for the above change. (syms_of_buffer): Declarations of Lisp variables default-direction-reversed and direction_reversed are deleted. New declarations for Lisp vairables default-orientation-reversed and default-enable-bidi-display, orientation_reversed, enable_bidi_display. --- src/buffer.c | 33 +++++++++++++++++++++++---------- 1 file changed, 23 insertions(+), 10 deletions(-) diff --git a/src/buffer.c b/src/buffer.c index b7efdbe5504..4d31b095f5d 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -4952,7 +4952,8 @@ init_buffer_once () XSETFASTINT (buffer_defaults.tab_width, 8); buffer_defaults.truncate_lines = Qnil; buffer_defaults.ctl_arrow = Qt; - buffer_defaults.direction_reversed = Qnil; + buffer_defaults.enable_bidi_display = Qnil; + buffer_defaults.orientation_reversed = Qnil; buffer_defaults.cursor_type = Qt; buffer_defaults.extra_line_spacing = Qnil; @@ -5031,7 +5032,8 @@ init_buffer_once () XSETFASTINT (buffer_local_flags.syntax_table, idx); ++idx; XSETFASTINT (buffer_local_flags.cache_long_line_scans, idx); ++idx; XSETFASTINT (buffer_local_flags.category_table, idx); ++idx; - XSETFASTINT (buffer_local_flags.direction_reversed, idx); ++idx; + XSETFASTINT (buffer_local_flags.enable_bidi_display, idx); ++idx; + XSETFASTINT (buffer_local_flags.orientation_reversed, idx); ++idx; XSETFASTINT (buffer_local_flags.buffer_file_coding_system, idx); /* Make this one a permanent local. */ buffer_permanent_local_flags[idx++] = 1; @@ -5243,10 +5245,15 @@ This is the same as (default-value 'abbrev-mode). */); doc: /* Default value of `ctl-arrow' for buffers that do not override it. This is the same as (default-value 'ctl-arrow). */); - DEFVAR_LISP_NOPRO ("default-direction-reversed", - &buffer_defaults.direction_reversed, - doc: /* Default value of `direction-reversed' for buffers that do not override it. -This is the same as (default-value 'direction-reversed). */); + DEFVAR_LISP_NOPRO ("default-enable-bidi-display", + &buffer_defaults.enable_bidi_display, + doc: /* *Default value of `enable-bidi-display' for buffers not overriding it. +This is the same as (default-value 'enable-bidi-display). */); + + DEFVAR_LISP_NOPRO ("default-orientation-reversed", + &buffer_defaults.orientation_reversed, + doc: /* *Default value of `orientation-reversed' for buffers that do not override it. +This is the same as (default-value 'orientation-reversed). */); DEFVAR_LISP_NOPRO ("default-enable-multibyte-characters", &buffer_defaults.enable_multibyte_characters, @@ -5470,11 +5477,17 @@ The variable `coding-system-for-write', if non-nil, overrides this variable. This variable is never applied to a way of decoding a file while reading it. */); - DEFVAR_PER_BUFFER ("direction-reversed", ¤t_buffer->direction_reversed, - Qnil, - doc: /* *Non-nil means lines in the buffer are displayed right to left. */); + DEFVAR_PER_BUFFER ("orientation-reversed", + ¤t_buffer->orientation_reversed, Qnil, + doc: /* Non-nil means set beginning of lines at the right end of the window. +See also the variable `enable-bidi-display'. */); + + DEFVAR_PER_BUFFER ("enable-bidi-display", + ¤t_buffer->enable_bidi_display, Qnil, + doc: /*Non-nil means display bidi text in correct visual order. +See also the variable `orientation-reversed'. */); - DEFVAR_PER_BUFFER ("truncate-lines", ¤t_buffer->truncate_lines, Qnil, + DEFVAR_PER_BUFFER ("truncate-lines", ¤t_buffer->truncate_lines, Qnil, doc: /* *Non-nil means do not display continuation lines. Instead, give each line of text just one screen line. -- 2.39.5