emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master eaab570 1/2: Ditch the check-parens functionality


From: Artur Malabarba
Subject: [elpa] master eaab570 1/2: Ditch the check-parens functionality
Date: Wed, 18 May 2016 17:37:51 +0000 (UTC)

branch: master
commit eaab57092284028b1567622c96d9b332de3c7a4d
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>

    Ditch the check-parens functionality
    
    For some unknown reason, it interacts poorly with query-replace.
---
 aggressive-indent.el |   17 ++---------------
 1 file changed, 2 insertions(+), 15 deletions(-)

diff --git a/aggressive-indent.el b/aggressive-indent.el
index 9530bf2..f116129 100644
--- a/aggressive-indent.el
+++ b/aggressive-indent.el
@@ -349,10 +349,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)
@@ -372,7 +368,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)
@@ -381,19 +377,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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]