From b9e20952ea75d1c82c7d0935004c23e795c67e2f Mon Sep 17 00:00:00 2001 From: Leo Liu Date: Fri, 13 Dec 2013 09:54:09 +0800 Subject: * bindings.el (visual-order-cursor-movement): Fix version. * indent.el (indent-region): Disable progress reporter in minibuffer. Fixes: debbugs:16108 --- lisp/indent.el | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) (limited to 'lisp/indent.el') diff --git a/lisp/indent.el b/lisp/indent.el index e733ece66d5..ab5860dd10c 100644 --- a/lisp/indent.el +++ b/lisp/indent.el @@ -481,13 +481,14 @@ column to indent to; if it is nil, use one of the three methods above." (save-excursion (setq end (copy-marker end)) (goto-char start) - (let ((pr (make-progress-reporter "Indenting region..." (point) end))) - (while (< (point) end) - (or (and (bolp) (eolp)) - (indent-according-to-mode)) + (let ((pr (unless (minibufferp) + (make-progress-reporter "Indenting region..." (point) end)))) + (while (< (point) end) + (or (and (bolp) (eolp)) + (indent-according-to-mode)) (forward-line 1) - (progress-reporter-update pr (point))) - (progress-reporter-done pr) + (and pr (progress-reporter-update pr (point)))) + (and pr (progress-reporter-done pr)) (move-marker end nil))))) ;; In most cases, reindenting modifies the buffer, but it may also ;; leave it unmodified, in which case we have to deactivate the mark -- cgit v1.2.1