Skip to content

Commit eae3243

Browse files
committed
test: paredit: whitespace code formatting only
1 parent 4b5d597 commit eae3243

File tree

1 file changed

+6
-10
lines changed

1 file changed

+6
-10
lines changed

test/rewrite_clj/paredit_test.cljc

Lines changed: 6 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -120,7 +120,7 @@ First line
120120
(pe/kill-at-pos {:row 1 :col 1}) z/root-string))))
121121

122122
(deftest kill-one-at-pos
123-
(let [sample "[10 20 30]" ]
123+
(let [sample "[10 20 30]"]
124124
(is (= "[10 30]"
125125
(-> (z/of-string sample {:track-position? true})
126126
(pe/kill-one-at-pos {:row 1 :col 4}) ; at whitespace
@@ -172,7 +172,6 @@ First line
172172
(is (= "\" world\""
173173
(-> (pe/kill-one-at-pos sample {:row 1 :col 2}) z/root-string)))))
174174

175-
176175
(deftest kill-one-at-pos-in-multiline-string
177176
(let [sample (z/of-string "\"foo bar do\n lorem\"" {:track-position? true})]
178177
(is (= "\" bar do\n lorem\""
@@ -182,8 +181,6 @@ First line
182181
(is (= "\"foo bar \n lorem\""
183182
(-> (pe/kill-one-at-pos sample {:row 1 :col 10}) z/root-string)))))
184183

185-
186-
187184
(deftest slurp-forward-and-keep-loc-rightmost
188185
(doseq [opts zipper-opts]
189186
(testing (zipper-opts-desc opts)
@@ -346,12 +343,12 @@ First line
346343
(deftest barf-forward-and-keep-loc
347344
(doseq [opts zipper-opts]
348345
(testing (zipper-opts-desc opts)
349-
(let [res (-> "[[1 2 3] 4]"
346+
(let [res (-> "[[1 2 3] 4]"
350347
(z/of-string opts)
351-
z/down z/down z/right; position at 2
352-
pe/barf-forward)]
353-
(is (= "[[1 2] 3 4]" (-> res z/root-string)))
354-
(is (= "2" (-> res z/string)))))))
348+
z/down z/down z/right; position at 2
349+
pe/barf-forward)]
350+
(is (= "[[1 2] 3 4]" (-> res z/root-string)))
351+
(is (= "2" (-> res z/string)))))))
355352

356353
(deftest barf-forward-on-elem-with-children
357354
(doseq [opts zipper-opts]
@@ -566,7 +563,6 @@ First line
566563
(pe/split-at-pos {:row 1 :col 9})
567564
z/root-string))))
568565

569-
570566
(deftest join-simple
571567
(doseq [opts zipper-opts]
572568
(testing (zipper-opts-desc opts)

0 commit comments

Comments
 (0)