* lisp/bindings.el (debug-ignored-errors): Add mark-inactive.

* lisp/simple.el (kill-region): Replace 'error' with 'user-error'.
(Bug#20785)

diff --git a/lisp/bindings.el b/lisp/bindings.el
index b658914c454ba73f1f72e8df9a69aeb6a8264d4e..3672812e5a17d553c4ebd15b6d6d94bcc181cd59 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -633,7 +633,7 @@ okay.  See `mode-line-format'.")
       ;; file-supersession should all be user-errors!
       `(beginning-of-line beginning-of-buffer end-of-line
        end-of-buffer end-of-file buffer-read-only
-       file-supersession
+       file-supersession mark-inactive
         user-error ;; That's the main one!
         ))
 

diff --git a/lisp/simple.el b/lisp/simple.el
index 1eb0643ef6f775983c17acad1656a109927cda97..46023a575f08bf7d5ae1f6698333a75b2a7e4841 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4017,7 +4017,7 @@ some text between BEG and END, but we're killing the region."
   ;; calling `kill-append'.
   (interactive (list (mark) (point) 'region))
   (unless (and beg end)
-    (error "The mark is not set now, so there is no region"))
+    (user-error "The mark is not set now, so there is no region"))
   (condition-case nil
       (let ((string (if region
                         (funcall region-extract-function 'delete)