Skip to content

Commit 2a89fa4

Browse files
committed
Add space after comma when exporting a name
1 parent b354202 commit 2a89fa4

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

ghcide/src/Development/IDE/Plugin/CodeAction.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -540,7 +540,7 @@ suggestExportUnusedTopBinding srcOpt ParsedModule{pm_parsed_source = L _ HsModul
540540
$ hsmodDecls
541541
, Just pos <- fmap _end . getLocatedRange =<< hsmodExports
542542
, Just needComma <- needsComma source <$> hsmodExports
543-
, let exportName = (if needComma then "," else "") <> printExport exportType name
543+
, let exportName = (if needComma then ", " else "") <> printExport exportType name
544544
insertPos = pos {_character = pred $ _character pos}
545545
= [("Export ‘" <> name <> "", TextEdit (Range insertPos insertPos) exportName)]
546546
| otherwise = []

0 commit comments

Comments
 (0)