Mercurial > emacs
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)); |