diff --git a/src/HSFM/FileSystem/Errors.hs b/src/HSFM/FileSystem/Errors.hs
index d125c0b..f815f83 100644
--- a/src/HSFM/FileSystem/Errors.hs
+++ b/src/HSFM/FileSystem/Errors.hs
@@ -116,7 +116,7 @@ throwSameFile fp1 fp2 = do
 -- source directory with all device+file IDs of the parent directories
 -- of the destination.
 throwDestinationInSource :: Path Abs -- ^ source dir
-                         -> Path Abs -- ^ full destination, `basename dest`
+                         -> Path Abs -- ^ full destination, `dirname dest`
                                      --   must exist
                          -> IO ()
 throwDestinationInSource source dest = do