summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/unsafep.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/unsafep.el')
-rw-r--r--lisp/emacs-lisp/unsafep.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/unsafep.el b/lisp/emacs-lisp/unsafep.el
index 1d3cde69392..e722cbc52dd 100644
--- a/lisp/emacs-lisp/unsafep.el
+++ b/lisp/emacs-lisp/unsafep.el
@@ -237,7 +237,7 @@ Otherwise result is a reason code."
((eq (car-safe fun) 'lambda)
(unsafep fun unsafep-vars))
((not (and (symbolp fun)
- (or (get fun 'side-effect-free)
+ (or (function-get fun 'side-effect-free)
(eq (get fun 'safe-function) t)
(eq safe-functions t)
(memq fun safe-functions))))