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
commit47757c747bd955d685682229e44800218a7ec64d (patch)
treede7ba7945ee24d60913a16e0f05c60942159f0e0 /lisp/winner.el
parentb63dc21e4fcf23a27d02379c7db9bef724eaa2d5 (diff)
downloademacs-47757c747bd955d685682229e44800218a7ec64d.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)