comparison src/window.c @ 57309:d039bbffafbc

(coordinates_in_window): Relax check for cursor on vertial border between mode lines. (Fset_window_fringes): Do not allow negative widths. (Fset_window_scroll_bars): Likewise.

57308:d3a7a9384b97

  /* The width of the area where the vertical line can be dragged.
     (Between mode lines for instance.  */
  int grabbable_width = ux;
  int lmargin_width, rmargin_width, text_left, text_right;

  if (*x < x0 || *x >= x1)
    return ON_NOTHING;

  /* In what's below, we subtract 1 when computing right_x because we
     want the rightmost pixel, which is given by left_pixel+width-1.  */
  if (w->pseudo_window_p)
    {
      left_x = 0;

	{
	  if (abs (*x - x1) < grabbable_width)
	    return ON_VERTICAL_BORDER;
	}

      /* Convert X and Y to window relative coordinates.
	 Mode line starts at left edge of window.  */
      *x -= x0;
      *y -= top_y;
      return part;

      && *y < top_y + CURRENT_HEADER_LINE_HEIGHT (w))
    {
      part = ON_HEADER_LINE;
      goto header_vertical_border_check;
    }

  /* Outside any interesting column?  */
  if (*x < left_x || *x > right_x)
    return ON_SCROLL_BAR;

     Lisp_Object window, left, right, outside_margins;
{
  struct window *w = decode_window (window);

  if (!NILP (left))
    CHECK_NUMBER (left);
  if (!NILP (right))
    CHECK_NUMBER (right);

  if (!EQ (w->left_fringe_width, left)
      || !EQ (w->right_fringe_width, right)
      || !EQ (w->fringes_outside_margins, outside_margins))
    {

     Lisp_Object window, width, vertical_type, horizontal_type;
{
  struct window *w = decode_window (window);

  if (!NILP (width))
    CHECK_NUMBER (width);

  if (XINT (width) == 0)
    vertical_type = Qnil;

  if (!(EQ (vertical_type, Qnil)

57309:d039bbffafbc

  /* The width of the area where the vertical line can be dragged.
     (Between mode lines for instance.  */
  int grabbable_width = ux;
  int lmargin_width, rmargin_width, text_left, text_right;

  /* In what's below, we subtract 1 when computing right_x because we
     want the rightmost pixel, which is given by left_pixel+width-1.  */
  if (w->pseudo_window_p)
    {
      left_x = 0;

	{
	  if (abs (*x - x1) < grabbable_width)
	    return ON_VERTICAL_BORDER;
	}

      if (*x < x0 || *x >= x1)
	return ON_NOTHING;

      /* Convert X and Y to window relative coordinates.
	 Mode line starts at left edge of window.  */
      *x -= x0;
      *y -= top_y;
      return part;

      && *y < top_y + CURRENT_HEADER_LINE_HEIGHT (w))
    {
      part = ON_HEADER_LINE;
      goto header_vertical_border_check;
    }

  if (*x < x0 || *x >= x1)
    return ON_NOTHING;

  /* Outside any interesting column?  */
  if (*x < left_x || *x > right_x)
    return ON_SCROLL_BAR;

     Lisp_Object window, left, right, outside_margins;
{
  struct window *w = decode_window (window);

  if (!NILP (left))
    CHECK_NATNUM (left);
  if (!NILP (right))
    CHECK_NATNUM (right);

  if (!EQ (w->left_fringe_width, left)
      || !EQ (w->right_fringe_width, right)
      || !EQ (w->fringes_outside_margins, outside_margins))
    {

     Lisp_Object window, width, vertical_type, horizontal_type;
{
  struct window *w = decode_window (window);

  if (!NILP (width))
    CHECK_NATNUM (width);

  if (XINT (width) == 0)
    vertical_type = Qnil;

  if (!(EQ (vertical_type, Qnil)