Start adding midje tests

project.clj

@@ -4,4 +4,5 @@
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
   :dependencies [[org.clojure/clojure "1.5.1"]]
+  :profiles {:dev {:dependencies [[midje "1.5.1"]]}}
   :main sloccount.core)

src/sloccount/files.clj

@@ -18,7 +18,7 @@
 
 ;; File selection
 (defn version-control? [filename]
-  (re-find #"\W(\.git|\.svn)\W" filename))
+  (re-find #"(^|/)(\.git|\.svn)/" filename))
 (defn settings? [filename]
   (re-find #"/(\.htaccess|\.gitignore)$" filename))
 (defn binary? [filename]

test/sloccount/files_test.clj

@@ -0,0 +1,20 @@
+(ns sloccount.files-test
+  (:use midje.sweet)
+  (:require [sloccount.files :as files]))
+
+(facts "about `source-files`"
+  (fact "it returns files in the path"
+    (files/source-files "path") => ["foo"]
+      (provided (files/filenames "path") => ["foo"]))
+
+  (fact "it excludes files in the .git directory"
+    (files/source-files "path") => ["foo"]
+      (provided (files/filenames "path") => [".git/bar" "/.git/baz" "foo"]))
+
+  (fact "it excludes .gitignore"
+    (files/source-files "path") => ["foo"]
+      (provided (files/filenames "path") => [".git/bar" "foo"]))
+
+  (fact "it excludes binary files"
+    (files/source-files "path") => ["foo"]
+      (provided (files/filenames "path") => ["text.doc" "foo"])))