diff --git a/src-literatetests/30-tests-context-free.blt b/src-literatetests/30-tests-context-free.blt
index 1cf082e..0488ffc 100644
--- a/src-literatetests/30-tests-context-free.blt
+++ b/src-literatetests/30-tests-context-free.blt
@@ -739,18 +739,18 @@ import Test as T hiding ()
 #test import-hiding-many
 import Prelude as X
   hiding
-  ( head
-  , init
-  , last
-  , maximum
-  , minimum
-  , pred
-  , read
-  , readFile
-  , succ
-  , tail
-  , undefined
-  )
+    ( head
+    , init
+    , last
+    , maximum
+    , minimum
+    , pred
+    , read
+    , readFile
+    , succ
+    , tail
+    , undefined
+    )
 
 #test long-module-name-simple
 import TestJustShortEnoughModuleNameLikeThisOne ()
diff --git a/src/Language/Haskell/Brittany/Internal/Layouters/Import.hs b/src/Language/Haskell/Brittany/Internal/Layouters/Import.hs
index 10e8285..fc43ecf 100644
--- a/src/Language/Haskell/Brittany/Internal/Layouters/Import.hs
+++ b/src/Language/Haskell/Brittany/Internal/Layouters/Import.hs
@@ -89,7 +89,10 @@ layoutImport limportD@(L _ importD) = docWrapNode limportD $ case importD of
           if compact
           then docAlt
             [ docSeq [hidDoc, docForceSingleline $ layoutLLIEs True llies]
-            , docPar hidDoc (layoutLLIEs True llies)
+            , let makeParIfHiding = if hiding
+                    then docAddBaseY BrIndentRegular . docPar hidDoc
+                    else id
+              in makeParIfHiding (layoutLLIEs True llies)
             ]
           else do
             ieDs <- layoutAnnAndSepLLIEs llies