From 9bce151df7b073c5f2507ea15ca2237814ae9248 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 3 Mar 2013 13:39:07 -0400 Subject: git subcommand cleanup Pass subcommand as a regular param, which allows passing git parameters like -c before it. This was already done in the pipeing set of functions, but not the command running set. --- Remote/Bup.hs | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'Remote/Bup.hs') diff --git a/Remote/Bup.hs b/Remote/Bup.hs index 2976ff086..f81751f82 100644 --- a/Remote/Bup.hs +++ b/Remote/Bup.hs @@ -204,8 +204,11 @@ storeBupUUID u buprepo = do r' <- Git.Config.read r let olduuid = Git.Config.get "annex.uuid" "" r' when (olduuid == "") $ - Git.Command.run "config" - [Param "annex.uuid", Param v] r' + Git.Command.run + [ Param "config" + , Param "annex.uuid" + , Param v + ] r' where v = fromUUID u -- cgit v1.2.3