summaryrefslogtreecommitdiff
path: root/lisp/tooltip.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2007-12-25 22:48:13 +0000
committerRichard M. Stallman <rms@gnu.org>2007-12-25 22:48:13 +0000
commit71dffedd1cda4de0788271a1f49cba740ada759e (patch)
treee7d384b7f745b201dbbe15e3cce4a0f11143b28a /lisp/tooltip.el
parent47757c747bd955d685682229e44800218a7ec64d (diff)
downloademacs-71dffedd1cda4de0788271a1f49cba740ada759e.tar.gz
(tooltip-region-active-p): Use `use-region-p'.
Diffstat (limited to 'lisp/tooltip.el')
-rw-r--r--lisp/tooltip.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el
index ffbebf06245..928e5de76b9 100644
--- a/lisp/tooltip.el
+++ b/lisp/tooltip.el
@@ -273,9 +273,7 @@ is based on the current syntax table."
(defmacro tooltip-region-active-p ()
"Value is non-nil if the region is currently active."
- (if (not (featurep 'xemacs))
- `(and transient-mark-mode mark-active)
- `(region-active-p)))
+ `(use-region-p))
(defun tooltip-expr-to-print (event)
"Return an expression that should be printed for EVENT.