From 2a9e5517d71d890a45f7fedb53102c4a039db787 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 28 Jan 2018 23:48:11 +0200 Subject: [PATCH] * lisp/simple.el (upcase-dwim, downcase-dwim): Add region-noncontiguous-p to the calls of region functions to support rectangular regions. --- lisp/simple.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/simple.el b/lisp/simple.el index 44f738f07e6..5a3a6e1f24e 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -8963,7 +8963,7 @@ Otherwise, it calls `upcase-word', with prefix argument passed to it to upcase ARG words." (interactive "*p") (if (use-region-p) - (upcase-region (region-beginning) (region-end)) + (upcase-region (region-beginning) (region-end) (region-noncontiguous-p)) (upcase-word arg))) (defun downcase-dwim (arg) @@ -8973,7 +8973,7 @@ Otherwise, it calls `downcase-word', with prefix argument passed to it to downcase ARG words." (interactive "*p") (if (use-region-p) - (downcase-region (region-beginning) (region-end)) + (downcase-region (region-beginning) (region-end) (region-noncontiguous-p)) (downcase-word arg))) (defun capitalize-dwim (arg) -- 2.39.2