Backwards compatibility for `user-error´

* lisp/org-compat.el (user-error): Defalias to `error´ for Emacsen
  that don't have it.
This commit is contained in:
Achim Gratz 2012-12-17 19:08:12 +01:00
parent bdc95549dd
commit b9ea74a195
1 changed files with 5 additions and 0 deletions

View File

@ -169,6 +169,11 @@ If DELETE is non-nil, delete all those overlays."
(set-buffer-modified-p modified-p))
(decompose-region beg end)))
(eval-when-compile
; user-error is only available from 24.2.50 on
(unless (fboundp 'user-error)
(defalias 'user-error 'error)))
;; Miscellaneous functions
(defun org-add-hook (hook function &optional append local)