Added a rule for pointless/sloppy if statements

src/jonase/kibit/control_structures.clj

@@ -5,5 +5,6 @@
     (if ?x nil ?y) when-not
     (if ?x (do . ?y)) when
     (if (not ?x) ?y ?z) if-not
-    (when (not ?x) . ?y) when-not})
-    
+    (when (not ?x) . ?y) when-not
+    (if true ?x . ?y) "do or removing the if"})
+

test/kibit/test/control_structures.clj

@@ -0,0 +1,19 @@
+(ns kibit.test.control-structures
+  (:require [jonase.kibit.core :as kibit])
+  (:use [clojure.test]))
+
+;; ==========
+;; NOTE
+;; ==============
+;; YOU SHOULD ALWAYS CHECK WITH ALL RULES
+;;
+;; Please ensure that new rules generate fully expected results across all
+;; rule sets.
+
+(deftest sloppy-if  
+  (let [exp-data '(if true (println "X"))
+        expected "[Kibit] Consider do or removing the if instead of (if true (println \"X\"))"
+        actual (doall (kibit/check-form exp-data))]
+    (is (= (count actual) 1))
+    (is (= expected (first actual)))))
+