[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 7dafbe3: Minor region-noncontiguous-p simplificatio
From: |
Basil L. Contovounesios |
Subject: |
[Emacs-diffs] master 7dafbe3: Minor region-noncontiguous-p simplification |
Date: |
Tue, 30 Apr 2019 19:47:40 -0400 (EDT) |
branch: master
commit 7dafbe3ab91e838803a84ab388bca03ff985e312
Author: Basil L. Contovounesios <address@hidden>
Commit: Basil L. Contovounesios <address@hidden>
Minor region-noncontiguous-p simplification
* lisp/simple.el (region-noncontiguous-p): Don't needlessly traverse
region-bounds.
---
lisp/simple.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/simple.el b/lisp/simple.el
index 5660f65..acea1f9 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -5612,7 +5612,7 @@ see `region-noncontiguous-p' and
`extract-rectangle-bounds'."
"Return non-nil if the region contains several pieces.
An example is a rectangular region handled as a list of
separate contiguous regions for each line."
- (> (length (region-bounds)) 1))
+ (cdr (region-bounds)))
(defvar redisplay-unhighlight-region-function
(lambda (rol) (when (overlayp rol) (delete-overlay rol))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 7dafbe3: Minor region-noncontiguous-p simplification,
Basil L. Contovounesios <=