diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,9 @@
 # shake-futhark
 
+## 0.1.0.1
+
+  * Fix bug
+
 ## 0.1.0.0
 
 Initial release
diff --git a/shake-futhark.cabal b/shake-futhark.cabal
--- a/shake-futhark.cabal
+++ b/shake-futhark.cabal
@@ -1,6 +1,6 @@
 cabal-version:   1.18
 name:            shake-futhark
-version:         0.1.0.0
+version:         0.1.0.1
 license:         BSD3
 license-file:    LICENSE
 copyright:       Copyright: (c) 2020 Vanessa McHale
diff --git a/src/Development/Shake/Futhark.hs b/src/Development/Shake/Futhark.hs
--- a/src/Development/Shake/Futhark.hs
+++ b/src/Development/Shake/Futhark.hs
@@ -27,8 +27,8 @@
 getAllFutDeps :: FilePath -> IO [FilePath]
 getAllFutDeps fp = do
     deps <- getFutDeps fp
-    level <- traverse getFutDeps deps
-    let next = nubOrd (mconcat (deps : level))
+    level <- traverse getAllFutDeps deps
+    let next = nubOrd (concat (deps : level))
     pure $ if null level then deps else next
 
 extractFromProgBase :: ProgBase f vn -> [FilePath]