(Fsplit_window): Nicer error if split size is too small.

diff --git a/src/window.c b/src/window.c
index 09781e2497e233812ae355fe6d206c857c332cbf..56fa5882528b15dc9da0f60d4362641a4710803a 100644 (file)
--- a/src/window.c
+++ b/src/window.c
@@ -2231,9 +2231,11 @@ and put SIZE columns in the first of the pair.")
 
   if (NILP (horflag))
     {
-      if (size < window_min_height
-         || size + window_min_height > XFASTINT (o->height))
-       args_out_of_range_3 (window, chsize, horflag);
+      if (size < window_min_height)
+       error ("Window height %d too small (after splitting)", size);
+      if (size + window_min_height > XFASTINT (o->height))
+       error ("Window height %d too small (after splitting)", 
+              XFASTINT (o->height) - size);
       if (NILP (o->parent)
          || NILP (XWINDOW (o->parent)->vchild))
        {
@@ -2244,9 +2246,11 @@ and put SIZE columns in the first of the pair.")
     }
   else
     {
-      if (size < window_min_width
-         || size + window_min_width > XFASTINT (o->width))
-       args_out_of_range_3 (window, chsize, horflag);
+      if (size < window_min_width)
+       error ("Window width %d too small (after splitting)", size);
+      if (size + window_min_width > XFASTINT (o->width))
+       error ("Window width %d too small (after splitting)", 
+              XFASTINT (o->width) - size);
       if (NILP (o->parent)
          || NILP (XWINDOW (o->parent)->hchild))
        {