aboutsummaryrefslogtreecommitdiffstats
path: root/src/doc.c
diff options
context:
space:
mode:
authorDmitry Antipov2012-07-10 20:53:26 +0400
committerDmitry Antipov2012-07-10 20:53:26 +0400
commit7d7bbefd049fc22cf3bf333592abf57a3bde8766 (patch)
treeab416b8873bb2c77a6d247b1c65a94ec5d274d3b /src/doc.c
parent3a4c8000fba422ac9d005d29ad0c5d8becc58167 (diff)
downloademacs-7d7bbefd049fc22cf3bf333592abf57a3bde8766.tar.gz
emacs-7d7bbefd049fc22cf3bf333592abf57a3bde8766.zip
Use XCAR and XCDR instead of Fcar and Fcdr where possible.
* admin/coccinelle/list_loop.cocci: Semantic patch to convert from Fcdr to XCDR and consistently use CONSP in the list iteration loops. * admin/coccinelle/vector_contents.cocci: Fix indentation. * src/callint.c, src/coding.c, src/doc.c, src/editfns.c, src/eval.c, * src/font.c, src/fontset.c, src/frame.c, src/gnutls.c, src/minibuf.c, * src/msdos.c, src/textprop.c, src/w32fns.c, src/w32menu.c, src/window.c, * src/xmenu.c: Changed to use XCAR and XCDR where argument type is known to be a Lisp_Cons.
Diffstat (limited to 'src/doc.c')
-rw-r--r--src/doc.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/doc.c b/src/doc.c
index 6b356d57cb3..7d82211faea 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -381,7 +381,7 @@ string is passed through `substitute-command-keys'. */)
381 } 381 }
382 else if (CONSP (fun)) 382 else if (CONSP (fun))
383 { 383 {
384 funcar = Fcar (fun); 384 funcar = XCAR (fun);
385 if (!SYMBOLP (funcar)) 385 if (!SYMBOLP (funcar))
386 xsignal1 (Qinvalid_function, fun); 386 xsignal1 (Qinvalid_function, fun);
387 else if (EQ (funcar, Qkeymap)) 387 else if (EQ (funcar, Qkeymap))