diff options
| -rw-r--r-- | lisp/tooltip.el | 4 |
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." | |||
| 273 | 273 | ||
| 274 | (defmacro tooltip-region-active-p () | 274 | (defmacro tooltip-region-active-p () |
| 275 | "Value is non-nil if the region is currently active." | 275 | "Value is non-nil if the region is currently active." |
| 276 | (if (not (featurep 'xemacs)) | 276 | `(use-region-p)) |
| 277 | `(and transient-mark-mode mark-active) | ||
| 278 | `(region-active-p))) | ||
| 279 | 277 | ||
| 280 | (defun tooltip-expr-to-print (event) | 278 | (defun tooltip-expr-to-print (event) |
| 281 | "Return an expression that should be printed for EVENT. | 279 | "Return an expression that should be printed for EVENT. |