diff options
author | Richard M. Stallman <rms@gnu.org> | 2003-04-06 20:28:28 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2003-04-06 20:28:28 +0000 |
commit | 64ea14d3bebac74b0fe2989893011c233e38dac1 (patch) | |
tree | 227d06e0486354de5fbda95cfd222809f160c61a /src/callint.c | |
parent | 918a23a7d96ac12d9d072a1631a94350f7f4787a (diff) | |
download | emacs-64ea14d3bebac74b0fe2989893011c233e38dac1.tar.gz |
Comment change.
Diffstat (limited to 'src/callint.c')
-rw-r--r-- | src/callint.c | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/src/callint.c b/src/callint.c index a6b83c6523f..f80f3c62027 100644 --- a/src/callint.c +++ b/src/callint.c @@ -174,14 +174,18 @@ check_mark (for_region) Fsignal (Qmark_inactive, Qnil); } +/* If the list of args INPUT was produced with an explicit call to + `list', look for elements that were computed with + (region-beginning) or (region-end), and put those expressions into + VALUES instead of the present values. + + This function doesn't return a value because it modifies elements + of VALUES to do its job. */ + static void fix_command (input, values) Lisp_Object input, values; { - /* If the list of args was produced with an explicit call to `list', - look for elements that were computed with (region-beginning) - or (region-end), and put those expressions into VALUES - instead of the present values. */ if (CONSP (input)) { Lisp_Object car; |