]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/simple.el (shell-command-on-region): Replace 'error' with 'user-error'.
authorJuri Linkov <juri@linkov.net>
Mon, 22 Jun 2015 22:45:33 +0000 (01:45 +0300)
committerJuri Linkov <juri@linkov.net>
Mon, 22 Jun 2015 22:45:33 +0000 (01:45 +0300)
(Bug#20785)

lisp/simple.el

index 48451aacbd6eca8d69968e86031d79a61b2743e9..0729d8c353e91a84527000e03f0f8943d355c4db 100644 (file)
@@ -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.