diff options
Diffstat (limited to 'lisp/simple.el')
| -rw-r--r-- | lisp/simple.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index d64c0c9ac74..0edf5ca8d9c 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -4160,8 +4160,7 @@ START and END specify the portion of the current buffer to be copied." (save-excursion (insert-buffer-substring oldbuf start end))))) -(put 'mark-inactive 'error-conditions '(mark-inactive error)) -(put 'mark-inactive 'error-message (purecopy "The mark is not active now")) +(define-error 'mark-inactive (purecopy "The mark is not active now")) (defvar activate-mark-hook nil "Hook run when the mark becomes active. |