Add hotloading for api generation

TheAngryByrd · Feb 4, 2019 · 8dd9d9a · 8dd9d9a
1 parent 6145bf0
commit 8dd9d9a
Show file tree

Hide file tree

Showing 2 changed files with 34 additions and 9 deletions.
diff --git a/Content/Library/build.fsx b/Content/Library/build.fsx
@@ -327,8 +327,21 @@ Target.create "GenerateDocs" <| fun _ ->
     Docs.generateDocs Docs.docsFileGlob gitRepoName
     Docs.generateAPI gitRepoName (!! srcBinGlob)
 
+let watchBuild () =
+    !! srcGlob
+    |> Seq.map(fun proj -> fun () ->
+        dotnet.watch
+            (fun opt ->
+                opt |> DotNet.Options.withWorkingDirectory (IO.Path.GetDirectoryName proj))
+            "build"
+            ""
+        |> ignore
+    )
+    |> Seq.iter (invokeAsync >> Async.Catch >> Async.Ignore >> Async.Start)
+
 Target.create "ServeDocs" <| fun _ ->
-    use d = Docs.watchDocs gitRepoName
+    let d1,d2 = Docs.watchDocs gitRepoName (!! srcBinGlob) watchBuild
+    use d2 = d2
     Docs.serveDocs ()
 
 

diff --git a/Content/Library/docs.fsx b/Content/Library/docs.fsx
@@ -196,15 +196,27 @@ let generateDocs (docSourcePaths : IGlobbingPattern) githubRepoName =
     copyAssets()
 
 
-let watchDocs githubRepoName =
-    docsFileGlob
-    |> ChangeWatcher.run (fun changes ->
-        changes
-        |> Seq.iter (fun m ->
-            generateDocs (!! m.FullPath) githubRepoName
-            refereshWebpageEvent.Trigger m.FullPath
+let watchDocs githubRepoName (dllGlob : IGlobbingPattern) (startWatchBuild : unit -> unit) =
+    let d1 =
+        docsFileGlob
+        |> ChangeWatcher.run (fun changes ->
+            changes
+            |> Seq.iter (fun m ->
+                generateDocs (!! m.FullPath) githubRepoName
+                refereshWebpageEvent.Trigger m.FullPath
+            )
         )
-    )
+    startWatchBuild ()
+    let d2 =
+        dllGlob
+        |> ChangeWatcher.run(fun changes ->
+            changes
+            |> Seq.iter(fun c -> Trace.logf "Regenerating API docs due to %s" c.FullPath )
+            generateAPI githubRepoName dllGlob
+            refereshWebpageEvent.Trigger "Api"
+        )
+    d1, d2
+
 
 open Microsoft.AspNetCore.Builder
 open Microsoft.AspNetCore.Hosting