Commit 059616e5 authored by Johan Bockgård's avatar Johan Bockgård
Browse files

* lisp/emacs-lisp/unsafep.el (unsafep): Handle backquoted forms.

parent 04380ff1
2011-01-11 Johan Bockgård <>
* emacs-lisp/unsafep.el (unsafep): Handle backquoted forms.
2011-01-11 Stefan Monnier <>
* progmodes/prolog.el: Fix up coding convention and such.
......@@ -202,6 +202,9 @@ UNSAFEP-VARS is a list of symbols with local bindings."
(dolist (x (nthcdr 3 form))
(setq reason (unsafep-progn (cdr x)))
(if reason (throw 'unsafep reason))))))
((eq fun '\`)
;; Backquoted form - safe if its expansion is.
(unsafep (cdr (backquote-process (cadr form)))))
;;First unsafep-function call above wasn't nil, no special case applies
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment