Mercurial > emacs
changeset 64574:5c90d9a42573
(Fcompose_region_internal, Fcompose_string_internal):
Improve argument/docstring consistency.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Thu, 21 Jul 2005 16:28:00 +0000 |
parents | eba4132141c1 |
children | ea5296a45331 |
files | src/composite.c |
diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/composite.c Thu Jul 21 16:25:59 2005 +0000 +++ b/src/composite.c Thu Jul 21 16:28:00 2005 +0000 @@ -716,8 +716,8 @@ Compose text in the region between START and END. Optional 3rd and 4th arguments are COMPONENTS and MODIFICATION-FUNC for the composition. See `compose-region' for more detail. */) - (start, end, components, mod_func) - Lisp_Object start, end, components, mod_func; + (start, end, components, modification_func) + Lisp_Object start, end, components, modification_func; { validate_region (&start, &end); if (!NILP (components) @@ -726,7 +726,7 @@ && !STRINGP (components)) CHECK_VECTOR (components); - compose_text (XINT (start), XINT (end), components, mod_func, Qnil); + compose_text (XINT (start), XINT (end), components, modification_func, Qnil); return Qnil; } @@ -737,8 +737,8 @@ Compose text between indices START and END of STRING. Optional 4th and 5th arguments are COMPONENTS and MODIFICATION-FUNC for the composition. See `compose-string' for more detail. */) - (string, start, end, components, mod_func) - Lisp_Object string, start, end, components, mod_func; + (string, start, end, components, modification_func) + Lisp_Object string, start, end, components, modification_func; { CHECK_STRING (string); CHECK_NUMBER (start); @@ -749,7 +749,7 @@ || XINT (end) > SCHARS (string)) args_out_of_range (start, end); - compose_text (XINT (start), XINT (end), components, mod_func, string); + compose_text (XINT (start), XINT (end), components, modification_func, string); return string; }