From 3a51abf1df61bfee39f8293c910028c2c86af16a Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Fri, 18 Feb 2005 14:28:24 +0000 Subject: (meta-mark-active): Fix condition to just use `mark-active' when defined. --- lisp/progmodes/meta-mode.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/progmodes/meta-mode.el') diff --git a/lisp/progmodes/meta-mode.el b/lisp/progmodes/meta-mode.el index ecf8da2e50..7bf9921b2e 100644 --- a/lisp/progmodes/meta-mode.el +++ b/lisp/progmodes/meta-mode.el @@ -898,7 +898,7 @@ The environment marked is the one that contains point or follows point." ;; Compatibility: XEmacs doesn't have the `mark-active' variable. (defun meta-mark-active () "Return whether the mark and region are currently active in this buffer." - (or (and (boundp 'mark-active) mark-active) (mark))) + (if (boundp 'mark-active) mark-active (mark))) -- cgit v1.2.3