This repository was archived by the owner on Oct 7, 2020. It is now read-only.
File tree Expand file tree Collapse file tree 1 file changed +2
-4
lines changed
src/Haskell/Ide/Engine/Plugin Expand file tree Collapse file tree 1 file changed +2
-4
lines changed Original file line number Diff line number Diff line change @@ -60,8 +60,6 @@ addPragmaCmd = CmdSync $ \(AddPragmaParams uri pragmaName) -> do
6060
6161-- | Offer to add a missing Language Pragma to the top of a file.
6262-- Pragmas are defined by a curated list of known pragmas, see 'possiblePragmas'.
63- -- May also offer to add unknown pragmas, if the pragma is a subexpression of
64- -- an existing plugin.
6563codeActionProvider :: CodeActionProvider
6664codeActionProvider plId docId _ (J. CodeActionContext (J. List diags) _monly) = do
6765 cmds <- mapM mkCommand pragmas
@@ -83,15 +81,15 @@ codeActionProvider plId docId _ (J.CodeActionContext (J.List diags) _monly) = do
8381
8482-- ---------------------------------------------------------------------
8583
86- -- | Find all Pragmas that have the search term as infix .
84+ -- | Find all Pragmas are an infix of the search term.
8785findPragma :: T. Text -> [T. Text ]
8886findPragma str = concatMap check possiblePragmas
8987 where
9088 check p = [p | T. isInfixOf p str]
9189
9290-- ---------------------------------------------------------------------
9391
94- -- | Possible Pragama names.
92+ -- | Possible Pragma names.
9593-- Is non-exhaustive, and may be extended.
9694possiblePragmas :: [T. Text ]
9795possiblePragmas =
You can’t perform that action at this time.
0 commit comments