From 8afacdd6b742d7a918d269ea6a9a056ba7ee24cc Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gregor.kleen@ifi.lmu.de>
Date: Mon, 21 Sep 2020 12:24:31 +0200
Subject: [PATCH] refactor: hlint

---
 src/Utils/Metrics.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Utils/Metrics.hs b/src/Utils/Metrics.hs
index 301d1aae9..443b816ea 100644
--- a/src/Utils/Metrics.hs
+++ b/src/Utils/Metrics.hs
@@ -128,14 +128,14 @@ jobHeldLocksCount heldLocks = Metric $ return (MkJobHeldLocksCount, collectJobHe
 
 {-# NOINLINE sourcedFileChunkSizes #-}
 sourcedFileChunkSizes :: Vector Label1 Histogram
-sourcedFileChunkSizes = unsafeRegister . vector ("storage") $ histogram info buckets
+sourcedFileChunkSizes = unsafeRegister . vector "storage" $ histogram info buckets
   where info = Info "uni2work_sourced_file_chunks_bytes"
                     "Sizes of files chunks sourced"
         buckets = 0 : histogramBuckets 1 20000000
 
 {-# NOINLINE sunkFileChunkSizes #-}
 sunkFileChunkSizes :: Vector Label1 Histogram
-sunkFileChunkSizes = unsafeRegister . vector ("storage") $ histogram info buckets
+sunkFileChunkSizes = unsafeRegister . vector "storage" $ histogram info buckets
   where info = Info "uni2work_sunk_file_chunks_bytes"
                     "Sizes of files chunks sunk"
         buckets = 0 : histogramBuckets 1 100000000