diff options
| author | Kim F. Storm | 2006-07-18 13:26:24 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2006-07-18 13:26:24 +0000 |
| commit | 2f0a47f918391b8828540744acd36fd2fe328f62 (patch) | |
| tree | 807c2acd2331db5c04bd0f6639f96df53e8cb17d /src | |
| parent | 740ef0b5254003ffbb0b323a9fb1abd2dd031edc (diff) | |
| download | emacs-2f0a47f918391b8828540744acd36fd2fe328f62.tar.gz emacs-2f0a47f918391b8828540744acd36fd2fe328f62.zip | |
(Fdocumentation): Use xsignal1.
Diffstat (limited to 'src')
| -rw-r--r-- | src/doc.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -416,7 +416,7 @@ string is passed through `substitute-command-keys'. */) | |||
| 416 | { | 416 | { |
| 417 | funcar = Fcar (fun); | 417 | funcar = Fcar (fun); |
| 418 | if (!SYMBOLP (funcar)) | 418 | if (!SYMBOLP (funcar)) |
| 419 | return Fsignal (Qinvalid_function, Fcons (fun, Qnil)); | 419 | xsignal1 (Qinvalid_function, fun); |
| 420 | else if (EQ (funcar, Qkeymap)) | 420 | else if (EQ (funcar, Qkeymap)) |
| 421 | return build_string ("Prefix command (definition is a keymap associating keystrokes with commands)."); | 421 | return build_string ("Prefix command (definition is a keymap associating keystrokes with commands)."); |
| 422 | else if (EQ (funcar, Qlambda) | 422 | else if (EQ (funcar, Qlambda) |
| @@ -443,7 +443,7 @@ string is passed through `substitute-command-keys'. */) | |||
| 443 | else | 443 | else |
| 444 | { | 444 | { |
| 445 | oops: | 445 | oops: |
| 446 | Fsignal (Qinvalid_function, Fcons (fun, Qnil)); | 446 | xsignal1 (Qinvalid_function, fun); |
| 447 | } | 447 | } |
| 448 | 448 | ||
| 449 | /* If DOC is 0, it's typically because of a dumped file missing | 449 | /* If DOC is 0, it's typically because of a dumped file missing |