[Fix #360] Convert END to a marker in clojure-align

clojure-emacs · Jan 16, 2016 · c27550f · c27550f
1 parent 015cbf8
commit c27550f
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/clojure-mode.el b/clojure-mode.el
@@ -822,6 +822,7 @@ When called from lisp code align everything between BEG and END."
                                      (point))))
                      (clojure-backward-logical-sexp)
                      (list (point) end)))))
+  (setq end (copy-marker end))
   (save-excursion
     (goto-char beg)
     (while (clojure--find-sexp-to-align end)

diff --git a/test/clojure-mode-indentation-test.el b/test/clojure-mode-indentation-test.el
@@ -495,6 +495,12 @@ x
         :bbbb :b}
  :bbbb :b}")
 
+(def-full-align-test end-is-a-marker
+  "{:a {:a                                :a
+     :aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa :a}
+ :b {:a  :a
+     :aa :a}}")
+
 
 ;;; Misc