Merge pull request #18 from Hi-Angel/dont-modify-on-same-indentation

purescript-indentation.el: don't modify buffer if indentation unchanged
purescript-emacs · Sep 30, 2024 · fbbbe60 · fbbbe60
2 parents c3f0d6e + 53c4675
commit fbbbe60
Showing 1 changed file with 12 additions and 11 deletions.
diff --git a/purescript-indentation.el b/purescript-indentation.el
@@ -196,17 +196,18 @@ autofill-mode."
       (end-of-line))))
 
 (defun purescript-indentation-reindent (col)
-  (beginning-of-line)
-  (delete-region (point)
-                 (progn
-                   (when (and (eq purescript-literate 'bird)
-                              (eq (char-after) ?>))
-                     (forward-char))
-                   (skip-syntax-forward "-")
-                   (point)))
-  (when (eq purescript-literate 'bird)
-    (insert ">"))
-  (indent-to col))
+  (unless (= col (purescript-indentation-current-indentation))
+    (beginning-of-line)
+    (delete-region (point)
+                   (progn
+                     (when (and (eq purescript-literate 'bird)
+                                (eq (char-after) ?>))
+                       (forward-char))
+                     (skip-syntax-forward "-")
+                     (point)))
+    (when (eq purescript-literate 'bird)
+      (insert ">"))
+    (indent-to col)))
 
 (defun purescript-indentation-current-indentation ()
   (if (eq purescript-literate 'bird)