From 72ef710f6e1c8e334fd50da9480a8cb151e823a2 Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Mon, 30 Jan 2017 21:45:02 -0500 Subject: [PATCH] Fix call to debugger on assertion failure * 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'. --- lisp/emacs-lisp/cl-preloaded.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/cl-preloaded.el b/lisp/emacs-lisp/cl-preloaded.el index 0b079410002..4ae77a58ec9 100644 --- a/lisp/emacs-lisp/cl-preloaded.el +++ b/lisp/emacs-lisp/cl-preloaded.el @@ -45,7 +45,7 @@ (defun cl--assertion-failed (form &optional string sargs args) (if debug-on-error - (funcall debugger `(cl-assertion-failed ,form ,string ,@sargs)) + (funcall debugger 'error `(cl-assertion-failed (,form ,string ,@sargs))) (if string (apply #'error string (append sargs args)) (signal 'cl-assertion-failed `(,form ,@sargs))))) -- 2.39.2