Fix operator import

- Do not add `(..)` when adding import for operators

CHANGELOG.md

@@ -1,12 +1,17 @@
 # Change Log
 All notable changes to the "Haskutil" extension will be documented in this file.
 
+## [0.11.3] - 2023-08-26
+### Fixed
+* `ImportProvider`:  
+  Do not add `(..)` when adding import for operators
+
 ## [0.11.2] - 2023-08-26
 ### Fixed
 * `OrganizeExtensionProvider`:  
   Make sure all `LANGUAGE` extension are aligning using minimal padding  
   Fixes [#41](https://github.com/EduardSergeev/vscode-haskutil/issues/41)
-- `ImportProvider`:  
+* `ImportProvider`:  
   Suggest adding class or data type with `(..)`, i.e. with all defined constructors/members  
   Fixes [#44](https://github.com/EduardSergeev/vscode-haskutil/issues/41)
 

input/after/ImportProvider.hs

@@ -1,6 +1,11 @@
+import Control.Arrow ((>>>))
 import Data.List (sort, tails)
 import Data.Maybe
 
 foo :: Ord a => [a] -> Maybe [a]
 foo xs =
   listToMaybe . tails. sort $ xs 
+
+bar :: (a -> b) -> (b -> c) -> (a -> c)
+bar f g =
+  f >>> g

input/before/ImportProvider.hs

@@ -2,3 +2,7 @@
 foo :: Ord a => [a] -> Maybe [a]
 foo xs =
   listToMaybe . tails. sort $ xs 
+
+bar :: (a -> b) -> (b -> c) -> (a -> c)
+bar f g =
+  f >>> g

package.json

@@ -2,7 +2,7 @@
   "name": "haskutil",
   "displayName": "Haskutil",
   "description": "'QuickFix' actions for Haskell editor",
-  "version": "0.11.2",
+  "version": "0.11.3",
   "publisher": "Edka",
   "repository": {
     "url": "https://github.com/EduardSergeev/vscode-haskutil"

src/features/importProvider.ts

@@ -41,7 +41,7 @@ export default class ImportProvider extends ImportProviderBase implements CodeAc
       codeAction.diagnostics = [diagnostic];
       codeActions.set(title, codeAction);
 
-      const element = variableName[0] === variableName[0].toUpperCase() ? `${variableName}(..)` : variableName;
+      const element = variableName[0] === variableName[0].toLowerCase() ? variableName : `${variableName}(..)`;
       title = `Add: "import ${result.module} (${element})"`;
       codeAction = new CodeAction(title, CodeActionKind.QuickFix);
       codeAction.command = {

src/test/providers.test.ts

@@ -17,7 +17,8 @@ suite('', () => {
   });
 
   test('Add missing import', () => {
-    return runQuickfixTest('ImportProvider.hs', 3,
+    return runQuickfixTest('ImportProvider.hs', 4,
+      'Add: "import Control.Arrow ((>>>))"',
       'Add: "import Data.Maybe"',
       'Add: "import Data.List (tails)"',
       'Add: "import Data.List (sort)"',