From: Kim F. Storm <storm@cua.dk>
Date: Mon, 4 Oct 2004 13:46:19 +0000 (+0000)
Subject: (coordinates_in_window): Relax check for cursor
X-Git-Tag: ttn-vms-21-2-B4~4737
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cb639b8f7c64fff917e85d8f96431f95959d969c;p=emacs.git

(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.
---

diff --git a/src/window.c b/src/window.c
index c696d7f9e27..11dabdaf964 100644
--- a/src/window.c
+++ b/src/window.c
@@ -607,9 +607,6 @@ coordinates_in_window (w, x, y)
   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)
@@ -659,6 +656,9 @@ coordinates_in_window (w, x, y)
 	    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;
@@ -673,6 +673,9 @@ coordinates_in_window (w, x, y)
       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;
@@ -6034,9 +6037,9 @@ display marginal areas and the text area.  */)
   struct window *w = decode_window (window);
 
   if (!NILP (left))
-    CHECK_NUMBER (left);
+    CHECK_NATNUM (left);
   if (!NILP (right))
-    CHECK_NUMBER (right);
+    CHECK_NATNUM (right);
 
   if (!EQ (w->left_fringe_width, left)
       || !EQ (w->right_fringe_width, right)
@@ -6096,7 +6099,7 @@ If TYPE is t, use the frame's scroll-bar type.  */)
   struct window *w = decode_window (window);
 
   if (!NILP (width))
-    CHECK_NUMBER (width);
+    CHECK_NATNUM (width);
 
   if (XINT (width) == 0)
     vertical_type = Qnil;