diff options
| author | Kim F. Storm | 2004-04-16 21:19:16 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2004-04-16 21:19:16 +0000 |
| commit | a1bfe073ea1774b5f14b77b37a08ebb7e1f23c90 (patch) | |
| tree | 3e789da10ee063c33373e4fc8a46c1f9fc11a3fb /src | |
| parent | b378e2c73668ca964ee7d195e2667cf3a1bee853 (diff) | |
| download | emacs-a1bfe073ea1774b5f14b77b37a08ebb7e1f23c90.tar.gz emacs-a1bfe073ea1774b5f14b77b37a08ebb7e1f23c90.zip | |
(Fkey_description): Change callers.
Diffstat (limited to 'src')
| -rw-r--r-- | src/callint.c | 4 | ||||
| -rw-r--r-- | src/doc.c | 2 | ||||
| -rw-r--r-- | src/keyboard.c | 4 |
3 files changed, 5 insertions, 5 deletions
diff --git a/src/callint.c b/src/callint.c index 50090db8b28..a3e4984fd16 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -612,7 +612,7 @@ supply if the command inquires which events were used to invoke it. */) | |||
| 612 | Qnil, Qnil, Qnil, Qnil); | 612 | Qnil, Qnil, Qnil, Qnil); |
| 613 | unbind_to (speccount1, Qnil); | 613 | unbind_to (speccount1, Qnil); |
| 614 | teml = args[i]; | 614 | teml = args[i]; |
| 615 | visargs[i] = Fkey_description (teml); | 615 | visargs[i] = Fkey_description (teml, Qnil); |
| 616 | 616 | ||
| 617 | /* If the key sequence ends with a down-event, | 617 | /* If the key sequence ends with a down-event, |
| 618 | discard the following up-event. */ | 618 | discard the following up-event. */ |
| @@ -639,7 +639,7 @@ supply if the command inquires which events were used to invoke it. */) | |||
| 639 | args[i] = Fread_key_sequence (build_string (callint_message), | 639 | args[i] = Fread_key_sequence (build_string (callint_message), |
| 640 | Qnil, Qt, Qnil, Qnil); | 640 | Qnil, Qt, Qnil, Qnil); |
| 641 | teml = args[i]; | 641 | teml = args[i]; |
| 642 | visargs[i] = Fkey_description (teml); | 642 | visargs[i] = Fkey_description (teml, Qnil); |
| 643 | unbind_to (speccount1, Qnil); | 643 | unbind_to (speccount1, Qnil); |
| 644 | 644 | ||
| 645 | /* If the key sequence ends with a down-event, | 645 | /* If the key sequence ends with a down-event, |
| @@ -808,7 +808,7 @@ thus, \\=\\=\\=\\= puts \\=\\= into the output, and \\=\\=\\=\\[ puts \\=\\[ int | |||
| 808 | } | 808 | } |
| 809 | else | 809 | else |
| 810 | { /* function is on a key */ | 810 | { /* function is on a key */ |
| 811 | tem = Fkey_description (tem); | 811 | tem = Fkey_description (tem, Qnil); |
| 812 | goto subst_string; | 812 | goto subst_string; |
| 813 | } | 813 | } |
| 814 | } | 814 | } |
diff --git a/src/keyboard.c b/src/keyboard.c index 3e58a2a75a8..c158ea2fced 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -7407,7 +7407,7 @@ parse_menu_item (item, notreal, inmenubar) | |||
| 7407 | newcache = chkcache; | 7407 | newcache = chkcache; |
| 7408 | if (chkcache) | 7408 | if (chkcache) |
| 7409 | { | 7409 | { |
| 7410 | tem = Fkey_description (tem); | 7410 | tem = Fkey_description (tem, Qnil); |
| 7411 | if (CONSP (prefix)) | 7411 | if (CONSP (prefix)) |
| 7412 | { | 7412 | { |
| 7413 | if (STRINGP (XCAR (prefix))) | 7413 | if (STRINGP (XCAR (prefix))) |
| @@ -9806,7 +9806,7 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_ | |||
| 9806 | int count = SPECPDL_INDEX (); | 9806 | int count = SPECPDL_INDEX (); |
| 9807 | 9807 | ||
| 9808 | record_unwind_protect (pop_message_unwind, Qnil); | 9808 | record_unwind_protect (pop_message_unwind, Qnil); |
| 9809 | binding = Fkey_description (bindings); | 9809 | binding = Fkey_description (bindings, Qnil); |
| 9810 | 9810 | ||
| 9811 | newmessage | 9811 | newmessage |
| 9812 | = (char *) alloca (SCHARS (SYMBOL_NAME (function)) | 9812 | = (char *) alloca (SCHARS (SYMBOL_NAME (function)) |