[Fix #511] Fix incorrect indentation of namespaced map (#533)

Author: anthonygalea

clojure-mode-indentation-test.el

@@ -148,6 +148,24 @@ DESCRIPTION is a string with the description of the spec."
     (cond
       |x)")
 
+  (when-indenting-with-point-it "should indent cond-> with a namespaced map"
+    "
+(cond-> #:a{:b 1}
+|x 1)"
+
+    "
+(cond-> #:a{:b 1}
+  |x 1)")
+
+  (when-indenting-with-point-it "should indent cond-> with a namespaced map 2"
+    "
+(cond-> #::a{:b 1}
+|x 1)"
+
+    "
+(cond-> #::a{:b 1}
+  |x 1)")
+
   (when-indenting-with-point-it "should indent threading macro with expression on first line"
     "
     (->> expr

clojure-mode-sexp-test.el

@@ -117,7 +117,15 @@ and point left there."
       (clojure-forward-logical-sexp 2)
       (expect (looking-back "\\^String biverse"))
       (clojure-backward-logical-sexp 1)
-      (expect (looking-at-p "\\^String biverse")))))
+      (expect (looking-at-p "\\^String biverse"))))
+
+  (it "should handle a namespaced map"
+    (with-clojure-buffer "first #:name/space{:k v}"
+      (clojure-backward-logical-sexp 1)
+      (expect (looking-at-p "#:name/space{:k v}"))
+      (insert  " #::ns {:k v}")
+      (clojure-backward-logical-sexp 1)
+      (expect (looking-at-p "#::ns {:k v}")))))
 
 (describe "clojure-backward-logical-sexp"
   (it "should work with buffer corners"