diff --git a/Command/AddComputed.hs b/Command/AddComputed.hs
index 7afd23a129..8af8e7c900 100644
--- a/Command/AddComputed.hs
+++ b/Command/AddComputed.hs
@@ -88,6 +88,7 @@ perform o r program = do
 	repopath <- fromRepo Git.repoPath
 	subdir <- liftIO $ relPathDirToFile repopath (literalOsPath ".")
 	let state = Remote.Compute.ComputeState
+		-- TODO add inherited initremote parameters
 		{ Remote.Compute.computeParams = computeParams o
 		, Remote.Compute.computeInputs = mempty
 		, Remote.Compute.computeOutputs = mempty