summaryrefslogtreecommitdiff
path: root/lang/elisp/primitives/fns.scm
diff options
context:
space:
mode:
Diffstat (limited to 'lang/elisp/primitives/fns.scm')
-rw-r--r--lang/elisp/primitives/fns.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lang/elisp/primitives/fns.scm b/lang/elisp/primitives/fns.scm
index ba2b53a79..f7a4aa003 100644
--- a/lang/elisp/primitives/fns.scm
+++ b/lang/elisp/primitives/fns.scm
@@ -18,11 +18,11 @@
(fset 'commandp
(lambda (sym)
- (if (interactive-spec (fref sym)) #t %nil)))
+ (if (interactive-specification (fref sym)) #t %nil)))
(fset 'fboundp
(lambda (sym)
- (variable? (symbol-fref sym))))
+ (->nil (variable? (symbol-fref sym)))))
(fset 'symbol-function fref/error-if-void)
@@ -30,7 +30,7 @@
(fset 'subrp
(lambda (obj)
- (not (not-subr? obj))))
+ (->nil (not (not-subr? obj)))))
(fset 'byte-code-function-p
(lambda (object)