comparison src/window.c @ 90918:e9f94688a064

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 781-792) - Update from CVS - Merge from gnus--rel--5.10 - Merge from emacs--rel--22 * emacs--rel--22 (patch 33-41) * gnus--rel--5.10 (patch 226-228) - Update from CVS Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-219
author Miles Bader <miles@gnu.org>
date Mon, 11 Jun 2007 00:58:11 +0000
parents 648e6c714c7d 1c6d21474ca9
children a66921565bcb
comparison
equal deleted inserted replaced
90917:9f1c3e957d3e 90918:e9f94688a064
4108 } 4108 }
4109 4109
4110 DEFUN ("shrink-window", Fshrink_window, Sshrink_window, 1, 2, "p", 4110 DEFUN ("shrink-window", Fshrink_window, Sshrink_window, 1, 2, "p",
4111 doc: /* Make current window ARG lines smaller. 4111 doc: /* Make current window ARG lines smaller.
4112 From program, optional second arg non-nil means shrink sideways arg columns. 4112 From program, optional second arg non-nil means shrink sideways arg columns.
4113 Interactively, if an argument is not given, make the window one line smaller. Only 4113 Interactively, if an argument is not given, make the window one line smaller.
4114 siblings to the right or below are changed. */) 4114 Only siblings to the right or below are changed. */)
4115 (arg, side) 4115 (arg, side)
4116 Lisp_Object arg, side; 4116 Lisp_Object arg, side;
4117 { 4117 {
4118 CHECK_NUMBER (arg); 4118 CHECK_NUMBER (arg);
4119 enlarge_window (selected_window, -XINT (arg), !NILP (side)); 4119 enlarge_window (selected_window, -XINT (arg), !NILP (side));