diff options
| author | Karl Heuer | 1995-03-03 01:51:09 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-03-03 01:51:09 +0000 |
| commit | 44820cc38c9b329d3821ea69ca1989f7634fa935 (patch) | |
| tree | 1ac6b919a2ede5847aaecc45d31bbb2b016ded07 /src | |
| parent | ce98e6086f7083634445f3aaefcbea3b1dcd4fa4 (diff) | |
| download | emacs-44820cc38c9b329d3821ea69ca1989f7634fa935.tar.gz emacs-44820cc38c9b329d3821ea69ca1989f7634fa935.zip | |
(Fcall_interactively): Disallow switch-frame events when reading `k' or `K'
specification.
Diffstat (limited to 'src')
| -rw-r--r-- | src/callint.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/callint.c b/src/callint.c index 93ecf3b7feb..be3517efcd4 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -476,13 +476,13 @@ Otherwise, this is done only if an arg is read using the minibuffer.") | |||
| 476 | break; | 476 | break; |
| 477 | 477 | ||
| 478 | case 'k': /* Key sequence. */ | 478 | case 'k': /* Key sequence. */ |
| 479 | args[i] = Fread_key_sequence (build_string (prompt), Qnil, Qnil); | 479 | args[i] = Fread_key_sequence (build_string (prompt), Qnil, Qnil, Qnil); |
| 480 | teml = args[i]; | 480 | teml = args[i]; |
| 481 | visargs[i] = Fkey_description (teml); | 481 | visargs[i] = Fkey_description (teml); |
| 482 | break; | 482 | break; |
| 483 | 483 | ||
| 484 | case 'K': /* Key sequence to be defined. */ | 484 | case 'K': /* Key sequence to be defined. */ |
| 485 | args[i] = Fread_key_sequence (build_string (prompt), Qnil, Qt); | 485 | args[i] = Fread_key_sequence (build_string (prompt), Qnil, Qt, Qnil); |
| 486 | teml = args[i]; | 486 | teml = args[i]; |
| 487 | visargs[i] = Fkey_description (teml); | 487 | visargs[i] = Fkey_description (teml); |
| 488 | break; | 488 | break; |