Error Messages: Properly align cyclic module error

Fixes: #24476

compiler/GHC/Driver/Make.hs

@@ -2404,7 +2404,7 @@ cyclicModuleErr mss
     show_path :: [ModuleGraphNode] -> SDoc
     show_path []  = panic "show_path"
     show_path [m] = ppr_node m <+> text "imports itself"
-    show_path (m1:m2:ms) = vcat ( nest 6 (ppr_node m1)
+    show_path (m1:m2:ms) = vcat ( nest 14 (ppr_node m1)
                                 : nest 6 (text "imports" <+> ppr_node m2)
                                 : go ms )
        where

testsuite/tests/driver/T24196/T24196.stderr

 Module graph contains a cycle:
-        module ‘T24196A’ (./T24196A.hs-boot)
+                module ‘T24196A’ (./T24196A.hs-boot)
         imports module ‘T24196B’ (T24196B.hs)
   which imports module ‘T24196A’ (./T24196A.hs-boot)

testsuite/tests/driver/T24275/T24275.stderr

 Module graph contains a cycle:
-        module ‘T24275A’ (./T24275A.hs-boot)
+                module ‘T24275A’ (./T24275A.hs-boot)
         imports module ‘T24275B’ (T24275B.hs)
   which imports module ‘T24275A’ (./T24275A.hs-boot)