From e7e61fb6cbe5455ded9bb550a64121223c099fc2 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Wed, 8 Jul 2015 15:08:02 -0400
Subject: convert all commands to work with optparse-applicative

Still no options though.
---
 Command/RemoteDaemon.hs | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'Command/RemoteDaemon.hs')

diff --git a/Command/RemoteDaemon.hs b/Command/RemoteDaemon.hs
index fdd938613..962189da1 100644
--- a/Command/RemoteDaemon.hs
+++ b/Command/RemoteDaemon.hs
@@ -12,10 +12,12 @@ import Command
 import RemoteDaemon.Core
 
 cmd :: Command
-cmd = noCommit $ command "remotedaemon" paramNothing seek SectionPlumbing
-	"detects when remotes have changed, and fetches from them"
+cmd = noCommit $ 
+	command "remotedaemon" SectionPlumbing
+		"detects when remotes have changed, and fetches from them"
+		paramNothing (withParams seek)
 
-seek :: CommandSeek
+seek :: CmdParams -> CommandSeek
 seek = withNothing start
 
 start :: CommandStart
-- 
cgit v1.2.3