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