Ignore dotfiles when running a directory of tests

1 files changed, 1 insertions, 1 deletions

diff --git a/tt.hs b/tt.hs
index eddacd4..f2798fc 100755
--- a/tt.hs
+++ b/tt.hs
@@ -39,7 +39,7 @@ unprefix :: FilePath -> String -> String
 unprefix testDir = fromMaybe <*> stripPrefix testDir
 
 isPython :: String -> Bool
-isPython = isSuffixOf ".py"
+isPython s = isSuffixOf ".py" s && head s /= '.'
 
 expand :: FilePath -> Bool -> String -> IO [String]
 expand testDir inTree s