summaryrefslogtreecommitdiff
path: root/lisp/winner.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2007-12-25 22:47:35 +0000
committerRichard M. Stallman <rms@gnu.org>2007-12-25 22:47:35 +0000
commit493cf7dc6e3cf4f891d0259733526f8736e9411b (patch)
tree601073af69a487c1eec1e91bfc4be71846aa09eb /lisp/winner.el
parenta6a05d91335354843a256c324c3618eaa34a3f0f (diff)
downloademacs-493cf7dc6e3cf4f891d0259733526f8736e9411b.tar.gz
(winner-active-region): Use `mark-active' if it's defined.
Diffstat (limited to 'lisp/winner.el')
-rw-r--r--lisp/winner.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/winner.el b/lisp/winner.el
index 1eb39a13399..941f3cef99b 100644
--- a/lisp/winner.el
+++ b/lisp/winner.el
@@ -46,9 +46,9 @@
(defmacro winner-active-region ()
- (if (fboundp 'region-active-p)
- '(region-active-p)
- 'mark-active))
+ (if (boundp 'mark-active)
+ 'mark-active
+ '(region-active-p)))
(defsetf winner-active-region () (store)
(if (fboundp 'zmacs-activate-region)