diff options
Diffstat (limited to 'src/frame.c')
| -rw-r--r-- | src/frame.c | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/src/frame.c b/src/frame.c index 1b6d36092ae..6e0e9c4ffc0 100644 --- a/src/frame.c +++ b/src/frame.c @@ -225,7 +225,7 @@ return values. */) : Qnil); } -DEFUN ("window-system", Fwindow_system, Swindow_system, 0, 1, 0, +DEFUE ("window-system", Fwindow_system, Swindow_system, 0, 1, 0, doc: /* The name of the window system that FRAME is displaying through. The value is a symbol: nil for a termcap frame (a character-only terminal), @@ -856,7 +856,7 @@ do_switch_frame (Lisp_Object frame, int track, int for_deletion, Lisp_Object nor return frame; } -DEFUN ("select-frame", Fselect_frame, Sselect_frame, 1, 2, "e", +DEFUE ("select-frame", Fselect_frame, Sselect_frame, 1, 2, "e", doc: /* Select FRAME. Subsequent editing commands apply to its selected window. Optional argument NORECORD means to neither change the order of @@ -894,14 +894,14 @@ to that frame. */) return do_switch_frame (event, 0, 0, Qnil); } -DEFUN ("selected-frame", Fselected_frame, Sselected_frame, 0, 0, 0, +DEFUE ("selected-frame", Fselected_frame, Sselected_frame, 0, 0, 0, doc: /* Return the frame that is now selected. */) (void) { return selected_frame; } -DEFUN ("window-frame", Fwindow_frame, Swindow_frame, 1, 1, 0, +DEFUE ("window-frame", Fwindow_frame, Swindow_frame, 1, 1, 0, doc: /* Return the frame object that window WINDOW is on. */) (Lisp_Object window) { @@ -909,7 +909,7 @@ DEFUN ("window-frame", Fwindow_frame, Swindow_frame, 1, 1, 0, return XWINDOW (window)->frame; } -DEFUN ("frame-first-window", Fframe_first_window, Sframe_first_window, 0, 1, 0, +DEFUE ("frame-first-window", Fframe_first_window, Sframe_first_window, 0, 1, 0, doc: /* Returns the topmost, leftmost window of FRAME. If omitted, FRAME defaults to the currently selected frame. */) (Lisp_Object frame) @@ -943,7 +943,7 @@ DEFUN ("active-minibuffer-window", Factive_minibuffer_window, return minibuf_level ? minibuf_window : Qnil; } -DEFUN ("frame-root-window", Fframe_root_window, Sframe_root_window, 0, 1, 0, +DEFUE ("frame-root-window", Fframe_root_window, Sframe_root_window, 0, 1, 0, doc: /* Returns the root-window of FRAME. If omitted, FRAME defaults to the currently selected frame. */) (Lisp_Object frame) @@ -980,7 +980,7 @@ FRAME defaults to the currently selected frame. */) return window; } -DEFUN ("set-frame-selected-window", Fset_frame_selected_window, +DEFUE ("set-frame-selected-window", Fset_frame_selected_window, Sset_frame_selected_window, 2, 3, 0, doc: /* Set selected window of FRAME to WINDOW. If FRAME is nil, use the selected frame. If FRAME is the @@ -1776,7 +1776,7 @@ before calling this function on it, like this. static void make_frame_visible_1 (Lisp_Object); -DEFUN ("make-frame-visible", Fmake_frame_visible, Smake_frame_visible, +DEFUE ("make-frame-visible", Fmake_frame_visible, Smake_frame_visible, 0, 1, "", doc: /* Make the frame FRAME visible (assuming it is an X window). If omitted, FRAME defaults to the currently selected frame. */) @@ -1876,7 +1876,7 @@ displayed in the terminal. */) return Qnil; } -DEFUN ("iconify-frame", Ficonify_frame, Siconify_frame, +DEFUE ("iconify-frame", Ficonify_frame, Siconify_frame, 0, 1, "", doc: /* Make the frame FRAME into an icon. If omitted, FRAME defaults to the currently selected frame. */) @@ -1961,7 +1961,7 @@ DEFUN ("visible-frame-list", Fvisible_frame_list, Svisible_frame_list, } -DEFUN ("raise-frame", Fraise_frame, Sraise_frame, 0, 1, "", +DEFUE ("raise-frame", Fraise_frame, Sraise_frame, 0, 1, "", doc: /* Bring FRAME to the front, so it occludes any frames it overlaps. If FRAME is invisible or iconified, make it visible. If you don't specify a frame, the selected frame is used. @@ -2014,7 +2014,7 @@ doesn't support multiple overlapping frames, this function does nothing. */) } -DEFUN ("redirect-frame-focus", Fredirect_frame_focus, Sredirect_frame_focus, +DEFUE ("redirect-frame-focus", Fredirect_frame_focus, Sredirect_frame_focus, 1, 2, 0, doc: /* Arrange for keystrokes typed at FRAME to be sent to FOCUS-FRAME. In other words, switch-frame events caused by events in FRAME will @@ -2392,7 +2392,7 @@ If FRAME is omitted, return information on the currently selected frame. */) } -DEFUN ("frame-parameter", Fframe_parameter, Sframe_parameter, 2, 2, 0, +DEFUE ("frame-parameter", Fframe_parameter, Sframe_parameter, 2, 2, 0, doc: /* Return FRAME's value for parameter PARAMETER. If FRAME is nil, describe the currently selected frame. */) (Lisp_Object frame, Lisp_Object parameter) @@ -2470,7 +2470,7 @@ If FRAME is nil, describe the currently selected frame. */) } -DEFUN ("modify-frame-parameters", Fmodify_frame_parameters, +DEFUE ("modify-frame-parameters", Fmodify_frame_parameters, Smodify_frame_parameters, 2, 2, 0, doc: /* Modify the parameters of frame FRAME according to ALIST. If FRAME is nil, it defaults to the selected frame. |