diff --git a/src/Hie/Yaml.hs b/src/Hie/Yaml.hs
index 9040af1..0f11682 100644
--- a/src/Hie/Yaml.hs
+++ b/src/Hie/Yaml.hs
@@ -50,7 +50,7 @@ fmtComponent (p, c) =
     <> "component: "
     <> dQuote c
 
--- Same as init but handle empty list without throwing errors.
+-- | Same as init but handle empty list without throwing errors.
 dropLast :: [a] -> [a]
 dropLast l = take (length l - 1) l