make label for the code action for extracting a local module to a sep…

…arate file clearer (rescript-lang#996)
jfrolich · Sep 3, 2024 · c6c7951 · c6c7951
1 parent dba290f
commit c6c7951
Show file tree

Hide file tree

Showing 3 changed files with 7 additions and 4 deletions.
diff --git a/analysis/src/Xform.ml b/analysis/src/Xform.ml
@@ -173,7 +173,10 @@ module ModuleToFile = struct
         in
         changed :=
           Some
-            (CodeActions.makeWithDocumentChanges ~title:"Extract module as file"
+            (CodeActions.makeWithDocumentChanges
+               ~title:
+                 (Printf.sprintf "Extract local module \"%s\" to file \"%s\""
+                    moduleName (moduleName ^ ".res"))
                ~kind:RefactorRewrite
                ~documentChanges:
                  [

diff --git a/analysis/tests/not_compiled/expected/DocTemplate.res.txt b/analysis/tests/not_compiled/expected/DocTemplate.res.txt
@@ -69,7 +69,7 @@ module T = {
   let b = 1
   //  ^xfm
 }
-Hit: Extract module as file
+Hit: Extract local module "T" to file "T.res"
 
 CreateFile: T.res
 
@@ -100,7 +100,7 @@ newText:
 
   */
   let b = 1
-Hit: Extract module as file
+Hit: Extract local module "T" to file "T.res"
 
 CreateFile: T.res
 

diff --git a/analysis/tests/src/expected/Xform.res.txt b/analysis/tests/src/expected/Xform.res.txt
@@ -168,7 +168,7 @@ newText:
     }
 
 Xform src/Xform.res 72:5
-Hit: Extract module as file
+Hit: Extract local module "ExtractableModule" to file "ExtractableModule.res"
 
 CreateFile: ExtractableModule.res