From: Chong Yidong <cyd@gnu.org>
Date: Mon, 6 Feb 2012 16:53:51 +0000 (+0800)
Subject: * doc.c (store_function_docstring): Fix last change.
X-Git-Tag: emacs-pretest-24.0.94~277
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4a6c7bb8744bbbadf3b3b0be8660a2100ae3e7aa;p=emacs.git

* doc.c (store_function_docstring): Fix last change.
---

diff --git a/src/doc.c b/src/doc.c
index ad2c667e771..02db4dde072 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -502,12 +502,12 @@ aren't strings.  */)
 /* Scanning the DOC files and placing docstring offsets into functions.  */
 
 static void
-store_function_docstring (Lisp_Object sym, EMACS_INT offset)
+store_function_docstring (Lisp_Object obj, EMACS_INT offset)
 /* Use EMACS_INT because we get offset from pointer subtraction.  */
 {
   /* Don't use indirect_function here, or defaliases will apply their
      docstrings to the base functions (Bug#2603).  */
-  Lisp_Object fun = XSYMBOL (sym)->function;
+  Lisp_Object fun = SYMBOLP (obj) ? XSYMBOL (obj)->function : obj;
 
   /* The type determines where the docstring is stored.  */