From: Richard M. Stallman Date: Tue, 25 Dec 2007 22:47:35 +0000 (+0000) Subject: (winner-active-region): Use `mark-active' if it's defined. X-Git-Tag: emacs-pretest-23.0.90~8837 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=47757c747bd955d685682229e44800218a7ec64d;p=emacs.git (winner-active-region): Use `mark-active' if it's defined. --- 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)