Mercurial > emacs

changeset 12387:caca393b084c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fsplit_window): Nicer error if split size is too small.
author Richard M. Stallman <rms@gnu.org>
date Mon, 26 Jun 1995 17:04:47 +0000
parents ceccff3df349
children 35668330115e
files src/window.c
diffstat 1 files changed, 10 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/src/window.c	Mon Jun 26 12:35:50 1995 +0000
+++ b/src/window.c	Mon Jun 26 17:04:47 1995 +0000
@@ -2231,9 +2231,11 @@
 
   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 @@
     }
   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))
 	{