File tree 1 file changed +2
-2
lines changed
plugins/hls-pragmas-plugin/src/Ide/Plugin 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -19,7 +19,7 @@ import Control.Lens hiding (List)
19
19
import Control.Monad.IO.Class (MonadIO (liftIO ))
20
20
import qualified Data.HashMap.Strict as H
21
21
import Data.List.Extra (nubOrdOn )
22
- import Data.Maybe (catMaybes )
22
+ import Data.Maybe (catMaybes , isJust )
23
23
import qualified Data.Text as T
24
24
import Development.IDE
25
25
import Development.IDE.GHC.Compat
@@ -203,7 +203,7 @@ completion _ide _ complParams = do
203
203
, Fuzzy. test word matcher
204
204
, (appearWhere == NewLine && line == word)
205
205
|| (appearWhere == CanInline && line /= word)
206
- || (T. elem ' ' matcher && appearWhere == NewLine && Fuzzy. test line matcher)
206
+ || (isJust ( T. find ( == ' ' ) matcher) && appearWhere == NewLine && Fuzzy. test line matcher)
207
207
]
208
208
where
209
209
line = T. toLower $ VFS. fullLine pfix
You can’t perform that action at this time.
0 commit comments