From 0cb5a870007c8299f8788962bd7dfc0848794dc0 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 6 Feb 2015 17:08:14 -0400 Subject: The file matching options are now only accepted by commands that can actually use them. --- Command.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Command.hs') diff --git a/Command.hs b/Command.hs index 56e895cae..fd12991a4 100644 --- a/Command.hs +++ b/Command.hs @@ -55,7 +55,7 @@ noRepo a c = c { cmdnorepo = Just a } {- Adds options to a command. -} withOptions :: [Option] -> Command -> Command -withOptions o c = c { cmdoptions = o } +withOptions o c = c { cmdoptions = cmdoptions c ++ o } {- For start and perform stages to indicate what step to run next. -} next :: a -> Annex (Maybe a) -- cgit v1.2.3