diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,9 @@
+# 0.2.1.2
+
+  * Bugfix
+
 # 0.2.1.1
-  
+
   * Improved documentation
 
 # 0.2.1.0
diff --git a/archive-sig.cabal b/archive-sig.cabal
--- a/archive-sig.cabal
+++ b/archive-sig.cabal
@@ -1,6 +1,6 @@
 cabal-version:   2.0
 name:            archive-sig
-version:         0.2.1.1
+version:         0.2.1.2
 license:         BSD3
 license-file:    LICENSE
 copyright:       Copyright: (c) 2019 Vanessa McHale
@@ -36,7 +36,7 @@
         base >=4.3 && <5,
         bytestring -any,
         composition-prelude >=2.0.3.0,
-        dir-traverse >=0.2.2.0
+        dir-traverse >=0.2.2.2
 
     if flag(development)
         ghc-options: -Werror
diff --git a/src/Archive/Compression.hs b/src/Archive/Compression.hs
--- a/src/Archive/Compression.hs
+++ b/src/Archive/Compression.hs
@@ -8,6 +8,7 @@
 
 import           Archive
 import qualified Data.ByteString.Lazy       as BSL
+import           Data.List                  (isSuffixOf)
 import           System.Directory.Recursive
 
 type Decompressor = BSL.ByteString -> BSL.ByteString
@@ -35,18 +36,20 @@
 packSrcDirAndCompress f dir tar = packFromFilesAndCompress f tar =<< getDirFiltered (pure.srcFilter) dir
 
 srcFilter :: FilePath -> Bool
-srcFilter ".git"          = False
-srcFilter "_dargs"        = False
-srcFilter ".hg"           = False
-srcFilter ".pijul"        = False
-srcFilter "dist"          = False
-srcFilter "dist-newstyle" = False
-srcFilter ".stack-work"   = False
-srcFilter "target"        = False -- rust/cargo
-srcFilter ".atspkg"       = False
-srcFilter ".shake"        = False
-srcFilter ".vagrant"      = False
-srcFilter _               = False
+srcFilter fp | ".git" `isSuffixOf` fp = False
+             | "_darcs" `isSuffixOf` fp = False
+             | ".hg" `isSuffixOf` fp = False
+             | ".pijul" `isSuffixOf` fp = False
+             | "dist" `isSuffixOf` fp = False
+             | "dist-newstyle" `isSuffixOf` fp = False
+             | ".stack-work" `isSuffixOf` fp = False
+             | "target" `isSuffixOf` fp = False
+             | ".atspkg" `isSuffixOf` fp = False
+             | ".shake" `isSuffixOf` fp = False
+             | ".vagrant" `isSuffixOf` fp = False
+             | "tags" `isSuffixOf` fp = False
+             | "hspec-failures" `isSuffixOf` fp = False
+             | otherwise = True
 
 -- | @since 0.2.0.0
 packFromFilesAndCompress :: Compressor -> FilePath -> [FilePath] -> IO ()