1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(tooltip-region-active-p): Use `use-region-p'.

This commit is contained in:
Richard M. Stallman 2007-12-25 22:48:13 +00:00
parent 47757c747b
commit 71dffedd1c

View file

@ -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.