Only write the targets file if it changed

Fixes #13
ionide · Oct 1, 2018 · 200d85a · 200d85a
1 parent 08f347a
commit 200d85a
Showing 1 changed file with 14 additions and 2 deletions.
diff --git a/src/dotnet-proj-info/Inspect.fs b/src/dotnet-proj-info/Inspect.fs
@@ -114,8 +114,20 @@ let writeTargetFile log templates targetFileDestPath =
 </Project>
         """
 
-    log (sprintf "writing helper target file in '%s'" targetFileDestPath)
-    File.WriteAllText(targetFileDestPath, targetFileTemplate.Trim())
+    let targetFileOnDisk =
+        if File.Exists(targetFileDestPath) then
+            try
+                Some (File.ReadAllText targetFileDestPath)
+            with
+            | _ -> None
+        else
+            None
+
+    let newTargetFile = targetFileTemplate.Trim()
+
+    if targetFileOnDisk <> Some newTargetFile then
+        log (sprintf "writing helper target file in '%s'" targetFileDestPath)
+        File.WriteAllText(targetFileDestPath, newTargetFile)
 
     Ok targetFileDestPath