add proof of work to countobjects

In this case, an empty string is hashed to generate the PoW.

1 files changed, 2 insertions, 2 deletions

diff --git a/HTTP.hs b/HTTP.hs
index 702a806..e5e4d85 100644
--- a/HTTP.hs
+++ b/HTTP.hs
@@ -36,8 +36,8 @@ type HttpAPI =
 	:<|> "keysafe" :> V1 :> "objects" :> ObjectIdent :> POWParam
 		:> ReqBody '[OctetStream] StorableObject
 		:> Put '[JSON] (POWGuarded StoreResult)
-	:<|> "keysafe" :> V1 :> "stats" :> "countobjects"
-		:> Get '[JSON] CountResult
+	:<|> "keysafe" :> V1 :> "stats" :> "countobjects" :> POWParam
+		:> Get '[JSON] (POWGuarded CountResult)
 
 type V1 = "v1"