Merge ff0e81a into 368b04d

Wilfred · May 28, 2020 · 834fffe · 834fffe
2 parents 368b04d + ff0e81a
commit 834fffe
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/elisp-def.el b/elisp-def.el
@@ -64,7 +64,9 @@ source code: they have e.g. org.elc but no org.el."
 (defun elisp-def--primitive-p (sym callable-p)
   "Return t if SYM is defined in C."
   (if callable-p
-      (subrp (indirect-function sym))
+      (if (fboundp 'subr-primitive-p)
+          (subr-primitive-p (indirect-function sym))
+        (subrp (indirect-function sym)))
     (let ((filename (find-lisp-object-file-name sym 'defvar)))
       (or (eq filename 'C-source)
           (and (stringp filename)