emacs: src/buffer.c comparison

comparison src/buffer.c @ 83476:866effff65a4

Merged from emacs@sv.gnu.org Patches applied: * emacs@sv.gnu.org/emacs--devo--0--patch-105 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-106 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/emacs--devo--0--patch-107 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-108 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-109 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-110 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-37 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-516

author	Karoly Lorentey <lorentey@elte.hu>
date	Tue, 21 Feb 2006 15:57:00 +0000
parents	b98066f4aa10 7e64cebb0463
children	8976b9f5eda1

comparison

equal deleted inserted replaced

-:88cd30b5064d
+:866effff65a4
 buffer_defaults.fringes_outside_margins = Qnil;
 buffer_defaults.scroll_bar_width = Qnil;
 buffer_defaults.vertical_scroll_bar_type = Qt;
 buffer_defaults.indicate_empty_lines = Qnil;
 buffer_defaults.indicate_buffer_boundaries = Qnil;
+buffer_defaults.fringe_indicator_alist = Qnil;
+buffer_defaults.fringe_cursor_alist = Qnil;
 buffer_defaults.scroll_up_aggressively = Qnil;
 buffer_defaults.scroll_down_aggressively = Qnil;
 buffer_defaults.display_time = Qnil;
 /* Assign the local-flags to the slots that have default values.
 XSETFASTINT (buffer_local_flags.fringes_outside_margins, idx); ++idx;
 XSETFASTINT (buffer_local_flags.scroll_bar_width, idx); ++idx;
 XSETFASTINT (buffer_local_flags.vertical_scroll_bar_type, idx); ++idx;
 XSETFASTINT (buffer_local_flags.indicate_empty_lines, idx); ++idx;
 XSETFASTINT (buffer_local_flags.indicate_buffer_boundaries, idx); ++idx;
+XSETFASTINT (buffer_local_flags.fringe_indicator_alist, idx); ++idx;
+XSETFASTINT (buffer_local_flags.fringe_cursor_alist, idx); ++idx;
 XSETFASTINT (buffer_local_flags.scroll_up_aggressively, idx); ++idx;
 XSETFASTINT (buffer_local_flags.scroll_down_aggressively, idx); ++idx;
 XSETFASTINT (buffer_local_flags.header_line_format, idx); ++idx;
 XSETFASTINT (buffer_local_flags.cursor_type, idx); ++idx;
 XSETFASTINT (buffer_local_flags.extra_line_spacing, idx); ++idx;
 DEFVAR_LISP_NOPRO ("default-indicate-buffer-boundaries",
 		     &buffer_defaults.indicate_buffer_boundaries,
 		     doc: /* Default value of `indicate-buffer-boundaries' for buffers that don't override it.
 This is the same as (default-value 'indicate-buffer-boundaries).  */);
+DEFVAR_LISP_NOPRO ("default-fringe-indicator-alist",
+		     &buffer_defaults.fringe_indicator_alist,
+		     doc: /* Default value of `fringe-indicator-alist' for buffers that don't override it.
+This is the same as (default-value 'fringe-indicator-alist').  */);
+DEFVAR_LISP_NOPRO ("default-fringe-cursor-alist",
+		     &buffer_defaults.fringe_cursor_alist,
+		     doc: /* Default value of `fringe-cursor-alist' for buffers that don't override it.
+This is the same as (default-value 'fringe-cursor-alist').  */);
 DEFVAR_LISP_NOPRO ("default-scroll-up-aggressively",
 		     &buffer_defaults.scroll_up_aggressively,
 		     doc: /* Default value of `scroll-up-aggressively'.
 This value applies in buffers that don't have their own local values.
 For example, ((top . left) (t . right)) places the top angle bitmap in
 left fringe, the bottom angle bitmap in right fringe, and both arrow
 bitmaps in right fringe.  To show just the angle bitmaps in the left
 fringe, but no arrow bitmaps, use ((top .  left) (bottom . left)).  */);
+DEFVAR_PER_BUFFER ("fringe-indicator-alist",
+		     &current_buffer->fringe_indicator_alist, Qnil,
+		     doc: /* *Mapping from logical to physical fringe indicator bitmaps.
+The value is an alist where each element (INDICATOR . BITMAPS)
+specifies the fringe bitmaps used to display a specific logical
+fringe indicator.
+INDICATOR specifies the logical indicator type which is one of the
+following symbols: `truncation' , `continuation', `overlay-arrow',
+`top', `bottom', `up', `down', `one-line', `empty-line', or `unknown'.
+BITMAPS is list of symbols (LEFT RIGHT [LEFT1 RIGHT1]) which specifies
+the actual bitmap shown in the left or right fringe for the logical
+indicator.  LEFT and RIGHT are the bitmaps shown in the left and/or
+right fringe for the specific indicator.  The LEFT1 or RIGHT1 bitmaps
+are used only for the `bottom' and `one-line' indicators when the last
+(only) line in has no final newline.  BITMAPS may also be a single
+symbol which is used in both left and right fringes.  */);
+DEFVAR_PER_BUFFER ("fringe-cursor-alist",
+		     &current_buffer->fringe_cursor_alist, Qnil,
+		     doc: /* *Mapping from logical to physical fringe cursor bitmaps.
+The value is an alist where each element (CURSOR . BITMAP)
+specifies the fringe bitmaps used to display a specific logical
+cursor type in the fringe.
+CURSOR specifies the logical cursor type which is one of the following
+symbols: `box' , `hollow', `bar', `hbar', or `hollow-small'.  The last
+one is used to show a hollow cursor on narrow lines display lines
+where the normal hollow cursor will not fit.
+BITMAP is the corresponding fringe bitmap shown for the logical
+cursor type.  */);
 DEFVAR_PER_BUFFER ("scroll-up-aggressively",
 		     &current_buffer->scroll_up_aggressively, Qnil,
 		     doc: /* How far to scroll windows upward.
 If you move point off the bottom, the window scrolls automatically.
 This variable controls how far it scrolls.  nil, the default,

Mercurial > emacs

comparison src/buffer.c @ 83476:866effff65a4