[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/doc.c,v
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/src/doc.c,v |
Date: |
Sat, 20 Oct 2007 20:20:19 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Juanma Barranquero <lektu> 07/10/20 20:20:19
Index: doc.c
===================================================================
RCS file: /sources/emacs/emacs/src/doc.c,v
retrieving revision 1.126
retrieving revision 1.127
diff -u -b -r1.126 -r1.127
--- doc.c 19 Oct 2007 17:23:31 -0000 1.126
+++ doc.c 20 Oct 2007 20:20:18 -0000 1.127
@@ -434,6 +434,17 @@
doc = tem;
else
return Qnil;
+ }
+ else if (EQ (funcar, Qmacro))
+ return Fdocumentation (Fcdr (fun), raw);
+ else
+ goto oops;
+ }
+ else
+ {
+ oops:
+ xsignal1 (Qinvalid_function, fun);
+ }
/* Check for an advised function. Its doc string
has an `ad-advice-info' text property. */
@@ -446,17 +457,6 @@
if (! NILP (innerfunc))
doc = call1 (intern ("ad-make-advised-docstring"), innerfunc);
}
- }
- else if (EQ (funcar, Qmacro))
- return Fdocumentation (Fcdr (fun), raw);
- else
- goto oops;
- }
- else
- {
- oops:
- xsignal1 (Qinvalid_function, fun);
- }
/* If DOC is 0, it's typically because of a dumped file missing
from the DOC file (bug in src/Makefile.in). */