Skip to content

Commit 1925ff0

Browse files
committed
Fix splice plugin
1 parent ddf34a5 commit 1925ff0

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

plugins/hls-refactor-plugin/src/Development/IDE/GHC/ExactPrint.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -698,7 +698,7 @@ annotate dflags needs_space ast = do
698698
let rendered = render dflags ast
699699
#if MIN_VERSION_ghc(9,4,0)
700700
expr' <- lift $ mapLeft (showSDoc dflags . ppr) $ parseAST dflags uniq rendered
701-
pure expr'
701+
pure $ setPrecedingLines expr' 0 (bool 0 1 needs_space)
702702
#elif MIN_VERSION_ghc(9,2,0)
703703
expr' <- lift $ mapLeft show $ parseAST dflags uniq rendered
704704
pure $ setPrecedingLines expr' 0 (bool 0 1 needs_space)

0 commit comments

Comments
 (0)