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:
parent
02d5251960
commit
22760342bf
1 changed files with 5 additions and 5 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue