@@ -16364,3 +16364,27 @@ Does only what it needs to do and nothing more, no XEP wrappers etc.")
(description
"Base58 ByteString is an implementation of BASE58 transcoding.")
(license license:public-domain)))
+
+(define-public ghc-hstatsd
+ (package
+ (name "ghc-hstatsd")
+ (version "0.1")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (hackage-uri "hstatsd" version))
+ (sha256
+ (base32 "092q52yyb1xdji1y72bdcgvp8by2w1z9j717sl1gmh2p89cpjrs4"))))
+ (build-system haskell-build-system)
+ (arguments
+ `(#:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'fix-for-network-3
+ (lambda _
+ (substitute* "src/Network/StatsD.hs"
+ (("sClose") "close")))))))
+ (inputs (list ghc-network))
+ (home-page "https://github.com/mokus0/hstatsd")
+ (synopsis "Quick and dirty statsd interface")
+ (description "Hstatsd is a statsd interface.")
+ (license license:public-domain)))