diff --git a/Command/Find.hs b/Command/Find.hs
index 1e509d1dd1..96f47ec877 100644
--- a/Command/Find.hs
+++ b/Command/Find.hs
@@ -20,7 +20,7 @@ import Types.Key
 import qualified Option
 
 def :: [Command]
-def = [withOptions [formatOption, print0Option] $
+def = [noCommit $ withOptions [formatOption, print0Option] $
 	command "find" paramPaths seek "lists available files"]
 
 formatOption :: Option
diff --git a/Command/Fix.hs b/Command/Fix.hs
index 227e08cd2a..38c8ac6e66 100644
--- a/Command/Fix.hs
+++ b/Command/Fix.hs
@@ -13,7 +13,7 @@ import qualified Annex.Queue
 import Annex.Content
 
 def :: [Command]
-def = [command "fix" paramPaths seek
+def = [noCommit $ command "fix" paramPaths seek
 	"fix up symlinks to point to annexed content"]
 
 seek :: [CommandSeek]