scratch/shortdoc e5a7f6f: Protect against future functions

[Lars Ingebrigtsen]

branch: scratch/shortdoc
commit e5a7f6f89d0d9cfdf2cee637d13cd6f69032827f
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Protect against future functions
---
 lisp/emacs-lisp/shortdoc.el | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el
index b4b4c8a..e2141a2 100644
--- a/lisp/emacs-lisp/shortdoc.el
+++ b/lisp/emacs-lisp/shortdoc.el
@@ -532,11 +532,14 @@ There can be any number of :example/:result elements."
     (button-mode)
     (mapc
      (lambda (data)
-       (if (stringp data)
-           (insert (propertize
-                    (concat data "\n\n")
-                    'face '(variable-pitch (:height 1.3 :weight bold))))
-         (shortdoc--display-function data)))
+       (cond
+        ((stringp data)
+         (insert (propertize
+                  (concat data "\n\n")
+                  'face '(variable-pitch (:height 1.3 :weight bold)))))
+        ;; There may be functions not yet defined in the data.
+        ((fboundp (car data))
+         (shortdoc--display-function data))))
      (cdr (assq group shortdoc--groups))))
   (goto-char (point-min)))