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