summaryrefslogtreecommitdiff
path: root/src/dispnew.c
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2008-06-05 18:00:36 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2008-06-05 18:00:36 +0000
commit87478b52f95d5519a94ed5d0ba95520dd443e752 (patch)
tree81861a7e1e13e25e7d49a77d26dc5f50a5d2a15a /src/dispnew.c
parent9e0e0d77da7a2726e7d718d4f303b1f5a6444b28 (diff)
downloademacs-87478b52f95d5519a94ed5d0ba95520dd443e752.tar.gz
emacs-87478b52f95d5519a94ed5d0ba95520dd443e752.tar.bz2
emacs-87478b52f95d5519a94ed5d0ba95520dd443e752.zip
* window.el (display-buffer-function, special-display-p)
(special-display-buffer-names, special-display-regexps) (special-display-function, same-window-p, same-window-buffer-names) (same-window-regexps, pop-up-frames, display-buffer-reuse-frames) (pop-up-frame-function, pop-up-windows) (split-window-preferred-function, split-height-threshold) (split-width-threshold, window--splittable-p) (window--try-to-split-window, window--frame-usable-p) (even-window-heights, window--even-window-heights) (window--display-buffer-1, window--display-buffer-2, display-buffer) (pop-to-buffer): Move from window.c and buffer.c. (split-window-preferred-horizontally): Remove. * cus-start.el: Remove corresponding declarations. * window.c (pop_up_windows, pop_up_frames) (display_buffer_reuse_frames, Vpop_up_frame_function) (Vdisplay_buffer_function, Veven_window_heights) (Vspecial_display_buffer_names, Vspecial_display_regexps) (Vspecial_display_function, Vsame_window_buffer_names) (Vsame_window_regexps, split_height_threshold) (Vsplit_window_preferred_function): Move those vars to window.el. (display_buffer_1, Fspecial_display_p, Fsame_window_p) (Fdisplay_buffer): Move those functions to window.el. (syms_of_window): Remove corresponding declarations. (display_buffer): New function. (temp_output_buffer_show, Fother_window_for_scrolling): Use it. * dispnew.c (Flast_nonminibuf_frame): New function. * buffer.c (Fpop_to_buffer): Move to window.el.
Diffstat (limited to 'src/dispnew.c')
-rw-r--r--src/dispnew.c12
1 files changed, 12 insertions, 0 deletions
diff --git a/src/dispnew.c b/src/dispnew.c
index 82541987908..0867c2eccbe 100644
--- a/src/dispnew.c
+++ b/src/dispnew.c
@@ -7061,6 +7061,17 @@ WINDOW nil or omitted means report on the selected window. */)
return w->cursor_off_p ? Qnil : Qt;
}
+DEFUN ("last-nonminibuffer-frame", Flast_nonminibuf_frame,
+ Slast_nonminibuf_frame, 0, 0, 0,
+ doc: /* Value is last nonminibuffer frame. */)
+ ()
+{
+ Lisp_Object frame;
+
+ XSETFRAME (frame, last_nonminibuf_frame);
+
+ return frame;
+}
/***********************************************************************
Initialization
@@ -7079,6 +7090,7 @@ syms_of_display ()
defsubr (&Ssend_string_to_terminal);
defsubr (&Sinternal_show_cursor);
defsubr (&Sinternal_show_cursor_p);
+ defsubr (&Slast_nonminibuf_frame);
#if GLYPH_DEBUG
defsubr (&Sdump_redisplay_history);