summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAaron Ecay <aaronecay@gmail.com>2015-01-18 23:42:32 -0500
committerAaron Ecay <aaronecay@gmail.com>2015-01-18 23:42:32 -0500
commit56bbacfd89bcdd773a20b102f956edc2aa5ff9d9 (patch)
tree9abfcbc6aa8bf300af484e009e43029be4cb202a
parentd1c5dc2e41814f571e851cf5363e5c75f4f316ef (diff)
downloadorg-mode-56bbacfd89bcdd773a20b102f956edc2aa5ff9d9.tar.gz
org-compat: obsolete org-activate-mark.
* lisp/org-compat.el (org-activate-mark): Make obsolete. The activate-mark function was introduced in Emacs 23 and org-activate-mark wasn’t called anywhere in the code base.
-rw-r--r--lisp/org-compat.el13
1 files changed, 2 insertions, 11 deletions
diff --git a/lisp/org-compat.el b/lisp/org-compat.el
index f76b86c..8ff7c34 100644
--- a/lisp/org-compat.el
+++ b/lisp/org-compat.el
@@ -287,17 +287,8 @@ Works on both Emacs and XEmacs."
(> (point) (region-beginning)))
(exchange-point-and-mark)))
-;; Emacs 22 misses `activate-mark'
-(if (fboundp 'activate-mark)
- (defalias 'org-activate-mark 'activate-mark)
- (defun org-activate-mark ()
- (when (mark t)
- (setq mark-active t)
- (when (and (boundp 'transient-mark-mode)
- (not transient-mark-mode))
- (setq transient-mark-mode 'lambda))
- (when (boundp 'zmacs-regions)
- (setq zmacs-regions t)))))
+;; Old alias for emacs 22 compatibility, now dropped
+(define-obsolete-function-alias 'org-activate-mark 'activate-mark)
;; Invisibility compatibility