[Emacs-diffs] master d010523: * lisp/simple.el (shell-command-on-region): Replace 'error' with 'user-error'.

[Juri Linkov]

branch: master
commit d010523177889867cf572ff48e8729b1503ea5a4
Author: Juri Linkov <address@hidden>
Commit: Juri Linkov <address@hidden>

    * lisp/simple.el (shell-command-on-region): Replace 'error' with 
'user-error'.
    
    (Bug#20785)
---
 lisp/simple.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index 48451aa..0729d8c 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3318,7 +3318,7 @@ display the error buffer if there were any errors.  When 
called
 interactively, this is t."
   (interactive (let (string)
                 (unless (mark)
-                  (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"))
                 ;; Do this before calling region-beginning
                 ;; and region-end, in case subprocess output
                 ;; relocates them while we are in the minibuffer.