diff options
-rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 5660f6574f4..acea1f9ddc1 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)))) |