From 56bc3e95cabb85e5f23e30b453f90438c33efbb8 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 15 May 2011 02:02:46 -0400 Subject: refactor some boilerplate --- Command/Find.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Command/Find.hs') diff --git a/Command/Find.hs b/Command/Find.hs index 6a6ae2978..eecf3cd7d 100644 --- a/Command/Find.hs +++ b/Command/Find.hs @@ -25,4 +25,4 @@ start :: CommandStartString start file = isAnnexed file $ \(key, _) -> do exists <- inAnnex key when exists $ liftIO $ putStrLn file - return Nothing + stop -- cgit v1.2.3