Permalink
Browse files

Merge pull request #51 from ljos/master

Do forms are unneccesary in let forms.
  • Loading branch information...
jonase committed Sep 20, 2012
2 parents b085c01 + 24ff7fd commit 25cf9d92ae4c9ce40115430e5d10175d7d826549
Showing with 3 additions and 2 deletions.
  1. +1 −1 src/kibit/rules/control_structures.clj
  2. +2 −1 test/kibit/test/control_structures.clj
@@ -18,7 +18,7 @@
;; suggest `while` for bindingless loop-recur
[(loop [] (when ?test . ?exprs (recur)))
(while ?test . ?exprs)]
- )
+ [(let ?binding (do . ?exprs)) (let ?binding . ?exprs)])
(comment
(when (not (pred? x y)) (f x y))
@@ -16,4 +16,5 @@
'single-expression '(do single-expression)
'_ '(when-not true anything)
'_ '(when false anything)
- '(when-let [a test] expr) '(if-let [a test] expr nil)))
+ '(when-let [a test] expr) '(if-let [a test] expr nil)
+ '(let [a 1] (println a) a) '(let [a 1] (do (println a) a))))

0 comments on commit 25cf9d9

Please sign in to comment.