• Jim Blandy's avatar
    * frame.h (struct frame): New fields `can_have_scrollbars' and · a42e9724
    Jim Blandy authored
    	`has_vertical_scrollbars'.
    	(FRAME_CAN_HAVE_SCROLLBARS, FRAME_HAS_VERTICAL_SCROLLBARS): New
    	accessors, for both the MULTI_FRAME and non-MULTI_FRAME.
    	(VERTICAL_SCROLLBAR_WIDTH, WINDOW_VERTICAL_SCROLLBAR,
    	WINDOW_VERTICAL_SCROLLBAR_COLUMN,
    	WINDOW_VERTICAL_SCROLLBAR_HEIGHT): New macros.
    	* window.h (struct window): New field `vertical_scrollbar'.
    	* xterm.h (struct x_display): vertical_scrollbars,
    	judge_timestamp, vertical_scrollbar_extra: New fields.
    	(struct scrollbar): New struct.
    	(VERTICAL_SCROLLBAR_PIXEL_WIDTH, VERTICAL_SCROLLBAR_PIXEL_HEIGHT,
    	VERTICAL_SCROLLBAR_LEFT_BORDER, VERTICAL_SCROLLBAR_RIGHT_BORDER,
    	VERTICAL_SCROLLBAR_TOP_BORDER, VERTICAL_SCROLLBAR_BOTTOM_BORDER,
    	CHAR_TO_PIXEL_WIDTH, CHAR_TO_PIXEL_HEIGHT, PIXEL_TO_CHAR_WIDTH,
    	PIXEL_TO_CHAR_HEIGHT): New accessors and macros.
    	* frame.c (make_frame): Initialize the `can_have_scrollbars' and
    	`has_vertical_scrollbars' fields of the frame.
    	* term.c (term_init): Note that TERMCAP terminals don't support
    	scrollbars.
    	(mouse_position_hook): Document new args.
    	(set_vertical_scrollbar_hook, condemn_scrollbars_hook,
    	redeem_scrollbar_hook, judge_scrollbars_hook): New hooks.
    	* termhooks.h: Declare and document them.
    	(enum scrollbar_part): New type.
    	(struct input_event): Describe the new form of the scrollbar_click
    	event type.  Change `part' from a Lisp_Object to an enum
    	scrollbar_part.  Add a new field `scrollbar'.
    	* keyboard.c (kbd_buffer_get_event): Pass appropriate new
    	parameters to *mouse_position_hook, and make_lispy_movement.
    	* xfns.c (x_set_vertical_scrollbar): New function.
    	(x_figure_window_size): Use new macros to calculate frame size.
    	(Fx_create_frame): Note that X Windows frames do support scroll
    	bars.  Default to "yes".
    	* xterm.c: #include <X11/cursorfont.h> and "window.h".
    	(x_vertical_scrollbar_cursor): New variable.
    	(x_term_init): Initialize it.
    	(last_mouse_bar, last_mouse_bar_frame, last_mouse_part,
    	last_mouse_scroll_range_start, last_mouse_scroll_range_end): New
    	variables.
    	(XTmouse_position): Use them to return scrollbar movement events.
    	Take new arguments, for that purpose.
    	(x_window_to_scrollbar, x_scrollbar_create,
    	x_scrollbar_set_handle, x_scrollbar_remove, x_scrollbar_move,
    	XTset_scrollbar, XTcondemn_scrollbars, XTredeem_scrollbar,
    	XTjudge_scrollbars, x_scrollbar_expose,
    	x_scrollbar_background_expose, x_scrollbar_handle_click,
    	x_scrollbar_handle_motion): New functions to implement scrollbars.
    	(x_term_init): Set the termhooks.h hooks to point to them.
    	(x_set_window_size): Use new macros to calculate frame size.  Set
    	vertical_scrollbar_extra field.
    	(x_make_frame_visible): Use the frame accessor
    	FRAME_HAS_VERTICAL_SCROLLBARS to decide if we need to map the
    	frame's subwindows as well.
    	(XTread_socket): Use new size-calculation macros from xterm.h when
    	processing ConfigureNotify events.
    	(x_wm_set_size_hint): Use PIXEL_TO_CHAR_WIDTH and
    	PIXEL_TO_CHAR_HEIGHT macros.
    	* ymakefile (xdisp.o): This now depends on termhooks.h.
    	(xterm.o): This now depends on window.h.
    
    	* floatfns.c (Flog): Fix unescaped newline in string.
    	* frame.c (Fnext_frame): Same.
    	* textprop.c (Fprevious_single_property_change): Same.
    	(syms_of_textprop): Same, for DEFVAR for
    	`interval_balance_threshold'.
    
    	Change the meaning of focus redirection to make switching windows
    	work properly.  Fredirect_frame_focus has the details.
    	* frame.h (focus_frame): Doc fix.
    	[not MULTI_FRAME] (FRAME_FOCUS_FRAME): Make this Qnil, which
    	indicates no focus redirection, instead of zero, which is
    	selected_frame.
    	* frame.c (make_frame): Initialize f->focus_frame to Qnil, rather
    	than making it point to frame itself.
    	(Fselect_frame): If changing the selected frame from FOO to BAR,
    	make all redirections to FOO shift to BAR as well.  Doc fix.
    	(Fredirect_frame_focus): Doc fix.  Accept nil as a valid
    	redirection, not just as a default for FRAME.
    	(Fframe_focus): Doc fix.
    	* keyboard.c (kbd_buffer_store_event, kbd_buffer_get_event): Deal
    	with focus redirections being nil.
    	* xterm.c (XTframe_rehighlight): Doc fix.  Deal with focus
    	redirections being nil.
    
    	It's a pain to remember that you can't assign to FRAME->visible.
    	Let's change all references to the `visible' member of struct
    	frame to use the accessor macros, and then write a setter for the
    	`visible' field that does the right thing.
    	* frame.h (FRAME_VISIBLE_P): Make this not an l-value.
    	(FRAME_SET_VISIBLE): New macro.
    	* frame.c (make_terminal_frame, Fdelete_frame): Use FRAME_SET_VISIBLE.
    	(Fframe_visible_p, Fvisible_frame_list): Use FRAME_VISIBLE_P and
    	FRAME_ICONIFIED_P.
    	* dispnew.c (Fredraw_display): Use the FRAME_VISIBLE_P and
    	FRAME_GARBAGED_P accessors.
    	* xdisp.c (redisplay): Use the FRAME_VISIBLE_P accessor.
    	* xfns.c (x_set_foreground_color, x_set_background_color,
    	x_set_cursor_color, x_set_border_pixel, x_set_icon_type): Use the
    	FRAME_VISIBLE_P accessor.
    	(Fx_create_frame): Use FRAME_SET_VISIBILITY.
    	* xterm.c (clear_cursor, x_display_bar_cursor,
    	x_display_box_cursor): Use FRAME_SET_VISIBILITY.
    a42e9724
frame.c 41.8 KB