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

(c-region-is-active-p): Use `mark-active' if it's defined.

This commit is contained in:
Richard M. Stallman 2007-12-25 22:44:28 +00:00
parent 02d5251960
commit 22760342bf

View file

@ -337,11 +337,11 @@ to it is returned. This function does not modify the point or the mark."
(defmacro c-region-is-active-p ()
;; Return t when the region is active. The determination of region
;; activeness is different in both Emacs and XEmacs.
(if (cc-bytecomp-fboundp 'region-active-p)
;; XEmacs.
'(region-active-p)
;; Emacs.
'mark-active))
(if (cc-bytecomp-boundp 'mark-active)
;; Emacs.
'mark-active
;; XEmacs.
'(region-active-p)))
(defmacro c-set-region-active (activate)
;; Activate the region if ACTIVE is non-nil, deactivate it