Mercurial > hg > xemacs-beta

diff src/doc.c @ 4381:3906442b491b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Improve style and add tests for 'built-in-symbol-file'.
author Stephen J. Turnbull <stephen@xemacs.org>
date Thu, 03 Jan 2008 01:33:59 -0800
parents 751d82f59283
children 061e030e3270
line wrap: on
line diff
--- a/src/doc.c	Wed Jan 02 22:11:03 2008 +0100
+++ b/src/doc.c	Thu Jan 03 01:33:59 2008 -0800
@@ -519,8 +519,7 @@
       fun = Findirect_function (symbol);
 
       if (SUBRP (fun) || (CONSP(fun) && (EQ (Qmacro, Fcar_safe (fun)))
-                          && !NILP(fun = Fcdr_safe (fun))
-                          && (SUBRP (fun))))
+                          && (fun = Fcdr_safe (fun), SUBRP (fun))))
 	{
 	  if (XSUBR (fun)->doc == 0)
 	    return Qnil;