From 3e9612418f87236fb5a1aec0525610ea88508bc6 Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Mon, 4 Apr 2016 14:21:06 -0300 Subject: [PATCH] [#77] Actually use aggressive-indent--balanced-parens --- aggressive-indent.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/aggressive-indent.el b/aggressive-indent.el index 31cee7253..36a7f428d 100644 --- a/aggressive-indent.el +++ b/aggressive-indent.el @@ -349,9 +349,12 @@ or messages." "List of (left right) limit of regions changed in the last command loop.") (make-variable-buffer-local 'aggressive-indent--changed-list) +(defvar-local aggressive-indent--balanced-parens t + "Non-nil if the current-buffer has balanced parens.") + (defun aggressive-indent--indent-if-changed () "Indent any region that changed in the last command loop." - (when aggressive-indent--changed-list + (when (and aggressive-indent--changed-list aggressive-indent--balanced-parens) (save-excursion (save-selected-window (unless (or (run-hook-wrapped 'aggressive-indent--internal-dont-indent-if #'eval) @@ -368,9 +371,6 @@ or messages." (setq aggressive-indent--changed-list (cdr aggressive-indent--changed-list)))))))))) -(defvar-local aggressive-indent--balanced-parens t - "Non-nil if the current-buffer has balanced parens.") - (defun aggressive-indent--check-parens () "Check if parens are balanced in the current buffer. Store result in `aggressive-indent--balanced-parens'." -- 2.39.2