procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix call to debugger on assertion failure

Browse source 
* lisp/emacs-lisp/cl-preloaded.el (cl--assertion-failed): The first
argument must be `error', and the second is a list of arguments for
`signal'.
This commit is contained in:
Noam Postavsky 2017-01-30 21:45:02 -05:00
parent ae8264c5cc
commit 72ef710f6e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/cl-preloaded.el
View file

@ -45,7 +45,7 @@
(defun cl--assertion-failed (form &optional string sargs args) (defun cl--assertion-failed (form &optional string sargs args)
(if debug-on-error (if debug-on-error
(funcall debugger `(cl-assertion-failed ,form ,string ,@sargs)) (funcall debugger 'error `(cl-assertion-failed (,form ,string ,@sargs)))
(if string (if string
(apply #'error string (append sargs args)) (apply #'error string (append sargs args))
(signal 'cl-assertion-failed `(,form ,@sargs))))) (signal 'cl-assertion-failed `(,form ,@sargs)))))