[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 4c77f20 2/2: Merge commit 'eaab57092284028b1567622c96d9b33
From: |
Artur Malabarba |
Subject: |
[elpa] master 4c77f20 2/2: Merge commit 'eaab57092284028b1567622c96d9b332de3c7a4d' |
Date: |
Wed, 18 May 2016 17:37:52 +0000 (UTC) |
branch: master
commit 4c77f20e144dc409e3c59abdb7105fb0db41ee54
Merge: 6ad010c eaab570
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
Merge commit 'eaab57092284028b1567622c96d9b332de3c7a4d'
---
packages/aggressive-indent/aggressive-indent.el | 17 ++---------------
1 file changed, 2 insertions(+), 15 deletions(-)
diff --git a/packages/aggressive-indent/aggressive-indent.el
b/packages/aggressive-indent/aggressive-indent.el
index ac3ff96..9c1f7d7 100644
--- a/packages/aggressive-indent/aggressive-indent.el
+++ b/packages/aggressive-indent/aggressive-indent.el
@@ -348,10 +348,6 @@ or messages."
"List of (left right) limit of regions changed in the last command loop.")
(make-variable-buffer-local 'aggressive-indent--changed-list)
-(defvar aggressive-indent--balanced-parens t
- "Non-nil if the current-buffer has balanced parens.")
-(make-variable-buffer-local 'aggressive-indent--balanced-parens)
-
(defun aggressive-indent--proccess-changed-list-and-indent ()
"Indent the regions in `aggressive-indent--changed-list'."
(let ((inhibit-modification-hooks t)
@@ -371,7 +367,7 @@ or messages."
(defun aggressive-indent--indent-if-changed ()
"Indent any region that changed in the last command loop."
- (when (and aggressive-indent--changed-list
aggressive-indent--balanced-parens)
+ (when aggressive-indent--changed-list
(save-excursion
(save-selected-window
(unless (or (run-hook-wrapped
'aggressive-indent--internal-dont-indent-if #'eval)
@@ -380,19 +376,10 @@ or messages."
(redisplay)
(aggressive-indent--proccess-changed-list-and-indent)))))))
-(defun aggressive-indent--check-parens ()
- "Check if parens are balanced in the current buffer.
-Store result in `aggressive-indent--balanced-parens'."
- (setq aggressive-indent--balanced-parens
- (save-excursion
- (ignore-errors
- (zerop (car (syntax-ppss (point-max))))))))
-
(defun aggressive-indent--keep-track-of-changes (l r &rest _)
"Store the limits (L and R) of each change in the buffer."
(when aggressive-indent-mode
- (push (list l r) aggressive-indent--changed-list)
- (aggressive-indent--check-parens)))
+ (push (list l r) aggressive-indent--changed-list)))
;;; Minor modes
;;;###autoload
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] master 4c77f20 2/2: Merge commit 'eaab57092284028b1567622c96d9b332de3c7a4d',
Artur Malabarba <=