aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorErik Naggum1996-10-31 13:43:37 +0000
committerErik Naggum1996-10-31 13:43:37 +0000
commita0d76c279ecb62448cee5a54672264e4399dc518 (patch)
treeedb208b945f2c6ddc5a084ec6a0bdd936c880103 /src
parent9939d191eb019b46831b7de2332be7c8080e8724 (diff)
downloademacs-a0d76c279ecb62448cee5a54672264e4399dc518.tar.gz
emacs-a0d76c279ecb62448cee5a54672264e4399dc518.zip
Reorganize function definitions so etags finds them.
Diffstat (limited to 'src')
-rw-r--r--src/abbrev.c5
-rw-r--r--src/editfns.c5
-rw-r--r--src/eval.c14
-rw-r--r--src/window.c4
-rw-r--r--src/xselect.c13
5 files changed, 18 insertions, 23 deletions
diff --git a/src/abbrev.c b/src/abbrev.c
index d6acfe289ba..240f668d090 100644
--- a/src/abbrev.c
+++ b/src/abbrev.c
@@ -417,9 +417,8 @@ describe_abbrev (sym, stream)
417 Fterpri (stream); 417 Fterpri (stream);
418} 418}
419 419
420DEFUN ("insert-abbrev-table-description", 420DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,
421 Finsert_abbrev_table_description, Sinsert_abbrev_table_description, 421 Sinsert_abbrev_table_description, 1, 2, 0,
422 1, 2, 0,
423 "Insert before point a full description of abbrev table named NAME.\n\ 422 "Insert before point a full description of abbrev table named NAME.\n\
424NAME is a symbol whose value is an abbrev table.\n\ 423NAME is a symbol whose value is an abbrev table.\n\
425If optional 2nd arg READABLE is non-nil, a human-readable description\n\ 424If optional 2nd arg READABLE is non-nil, a human-readable description\n\
diff --git a/src/editfns.c b/src/editfns.c
index dcef4bce269..bff9fa8c35c 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -1159,9 +1159,8 @@ Any other markers at the point of insertion also end up after the text.")
1159 return Qnil; 1159 return Qnil;
1160} 1160}
1161 1161
1162DEFUN ("insert-before-markers-and-inherit", 1162DEFUN ("insert-before-markers-and-inherit", Finsert_and_inherit_before_markers,
1163 Finsert_and_inherit_before_markers, Sinsert_and_inherit_before_markers, 1163 Sinsert_and_inherit_before_markers, 0, MANY, 0,
1164 0, MANY, 0,
1165 "Insert text at point, relocating markers and inheriting properties.\n\ 1164 "Insert text at point, relocating markers and inheriting properties.\n\
1166Point moves forward so that it ends up after the inserted text.\n\ 1165Point moves forward so that it ends up after the inserted text.\n\
1167Any other markers at the point of insertion also end up after the text.") 1166Any other markers at the point of insertion also end up after the text.")
diff --git a/src/eval.c b/src/eval.c
index 069608b906b..bf1eaacedd1 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1942,8 +1942,8 @@ not `make-local-variable'.")
1942 return Qnil; 1942 return Qnil;
1943} 1943}
1944 1944
1945DEFUN ("run-hook-with-args", 1945DEFUN ("run-hook-with-args", Frun_hook_with_args,
1946 Frun_hook_with_args, Srun_hook_with_args, 1, MANY, 0, 1946 Srun_hook_with_args, 1, MANY, 0,
1947 "Run HOOK with the specified arguments ARGS.\n\ 1947 "Run HOOK with the specified arguments ARGS.\n\
1948HOOK should be a symbol, a hook variable. If HOOK has a non-nil\n\ 1948HOOK should be a symbol, a hook variable. If HOOK has a non-nil\n\
1949value, that value may be a function or a list of functions to be\n\ 1949value, that value may be a function or a list of functions to be\n\
@@ -1963,9 +1963,8 @@ not `make-local-variable'.")
1963 return run_hook_with_args (nargs, args, to_completion); 1963 return run_hook_with_args (nargs, args, to_completion);
1964} 1964}
1965 1965
1966DEFUN ("run-hook-with-args-until-success", 1966DEFUN ("run-hook-with-args-until-success", Frun_hook_with_args_until_success,
1967 Frun_hook_with_args_until_success, Srun_hook_with_args_until_success, 1967 Srun_hook_with_args_until_success, 1, MANY, 0,
1968 1, MANY, 0,
1969 "Run HOOK with the specified arguments ARGS.\n\ 1968 "Run HOOK with the specified arguments ARGS.\n\
1970HOOK should be a symbol, a hook variable. Its value should\n\ 1969HOOK should be a symbol, a hook variable. Its value should\n\
1971be a list of functions. We call those functions, one by one,\n\ 1970be a list of functions. We call those functions, one by one,\n\
@@ -1982,9 +1981,8 @@ not `make-local-variable'.")
1982 return run_hook_with_args (nargs, args, until_success); 1981 return run_hook_with_args (nargs, args, until_success);
1983} 1982}
1984 1983
1985DEFUN ("run-hook-with-args-until-failure", 1984DEFUN ("run-hook-with-args-until-failure", Frun_hook_with_args_until_failure,
1986 Frun_hook_with_args_until_failure, Srun_hook_with_args_until_failure, 1985 Srun_hook_with_args_until_failure, 1, MANY, 0,
1987 1, MANY, 0,
1988 "Run HOOK with the specified arguments ARGS.\n\ 1986 "Run HOOK with the specified arguments ARGS.\n\
1989HOOK should be a symbol, a hook variable. Its value should\n\ 1987HOOK should be a symbol, a hook variable. Its value should\n\
1990be a list of functions. We call those functions, one by one,\n\ 1988be a list of functions. We call those functions, one by one,\n\
diff --git a/src/window.c b/src/window.c
index 900b66a0068..61c717397f0 100644
--- a/src/window.c
+++ b/src/window.c
@@ -3353,8 +3353,8 @@ save_window_save (window, vector, i)
3353 return i; 3353 return i;
3354} 3354}
3355 3355
3356DEFUN ("current-window-configuration", 3356DEFUN ("current-window-configuration", Fcurrent_window_configuration,
3357 Fcurrent_window_configuration, Scurrent_window_configuration, 0, 1, 0, 3357 Scurrent_window_configuration, 0, 1, 0,
3358 "Return an object representing the current window configuration of FRAME.\n\ 3358 "Return an object representing the current window configuration of FRAME.\n\
3359If FRAME is nil or omitted, use the selected frame.\n\ 3359If FRAME is nil or omitted, use the selected frame.\n\
3360This describes the number of windows, their sizes and current buffers,\n\ 3360This describes the number of windows, their sizes and current buffers,\n\
diff --git a/src/xselect.c b/src/xselect.c
index 053d7f0fa3e..009e206ebdf 100644
--- a/src/xselect.c
+++ b/src/xselect.c
@@ -1736,9 +1736,8 @@ x_handle_selection_notify (event)
1736} 1736}
1737 1737
1738 1738
1739DEFUN ("x-own-selection-internal", 1739DEFUN ("x-own-selection-internal", Fx_own_selection_internal,
1740 Fx_own_selection_internal, Sx_own_selection_internal, 1740 Sx_own_selection_internal, 2, 2, 0,
1741 2, 2, 0,
1742 "Assert an X selection of the given TYPE with the given VALUE.\n\ 1741 "Assert an X selection of the given TYPE with the given VALUE.\n\
1743TYPE is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'.\n\ 1742TYPE is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'.\n\
1744\(Those are literal upper-case symbol names, since that's what X expects.)\n\ 1743\(Those are literal upper-case symbol names, since that's what X expects.)\n\
@@ -1759,8 +1758,8 @@ anything that the functions on `selection-converter-alist' know about.")
1759 simply return our selection value. If we are not the owner, this 1758 simply return our selection value. If we are not the owner, this
1760 will block until all of the data has arrived. */ 1759 will block until all of the data has arrived. */
1761 1760
1762DEFUN ("x-get-selection-internal", 1761DEFUN ("x-get-selection-internal", Fx_get_selection_internal,
1763 Fx_get_selection_internal, Sx_get_selection_internal, 2, 2, 0, 1762 Sx_get_selection_internal, 2, 2, 0,
1764 "Return text selected from some X window.\n\ 1763 "Return text selected from some X window.\n\
1765SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'.\n\ 1764SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'.\n\
1766\(Those are literal upper-case symbol names, since that's what X expects.)\n\ 1765\(Those are literal upper-case symbol names, since that's what X expects.)\n\
@@ -1807,8 +1806,8 @@ TYPE is the type of data desired, typically `STRING'.")
1807 return val; 1806 return val;
1808} 1807}
1809 1808
1810DEFUN ("x-disown-selection-internal", 1809DEFUN ("x-disown-selection-internal", Fx_disown_selection_internal,
1811 Fx_disown_selection_internal, Sx_disown_selection_internal, 1, 2, 0, 1810 Sx_disown_selection_internal, 1, 2, 0,
1812 "If we own the selection SELECTION, disown it.\n\ 1811 "If we own the selection SELECTION, disown it.\n\
1813Disowning it means there is no such selection.") 1812Disowning it means there is no such selection.")
1814 (selection, time) 1813 (selection, time)