From: Frank Doepper Date: Thu, 2 Sep 2021 15:21:40 +0000 (+0200) Subject: whitespace X-Git-Url: https://woffs.de/git/fd/haskell-amqp-utils.git/commitdiff_plain/refs/heads/agitpropmultidir?ds=sidebyside whitespace --- diff --git a/Network/AMQP/Utils/Helpers.hs b/Network/AMQP/Utils/Helpers.hs index adbbafa..a4fe1a8 100644 --- a/Network/AMQP/Utils/Helpers.hs +++ b/Network/AMQP/Utils/Helpers.hs @@ -409,4 +409,4 @@ sleepingBeauty = -- | extract first input file in case only one is needed firstInputFile :: [(String,String,String)] -> String firstInputFile [] = "-" -firstInputFile ((x,_,_):_) = x +firstInputFile ((x,_,_):_) = x