Moving to Fable 2

App.fs

// Client project
// This piece of code follows the pattern from SAFE-Dojo for loading data from API endpoints

open Thoth.Json

type Dto = int list

let dtoDecoder = Decode.Auto.generateDecoder<Dto> ()

let init () = 
    let initialModel = Model.Empty
    
    let withException = function
        | Ok x -> (match x with Ok res -> Ok res | Error str -> Error(exn str))
        | Error ex -> Error ex

    let loadDto =
        Cmd.ofPromise
            (tryFetchAs "/api/dto" dtoDecoder)
            [] 
            (Ok >> withException >> DtoLoaded)
            (Error >> DtoLoaded)
    initialModel, loadDto

build.fsx

// my folders' structure is not just simple Client/Server/Shared, but with another projects at the upper level,
// so when the build is started in the topmost folder it was failing to run `dotnet fable webpack` command because
// the webpack configuration could not be found, and then `webpack-dev-server` could not find the content folder...

let fableWebpack' fwp opt clientPath =
    let webpackProd =
        match opt with
        | Some "Release" -> "production"
        | _ -> "development"
    sprintf "fable %s -- --config \"%s/webpack.config.js\" --mode %s --context \"%s\""
        fwp clientPath webpackProd clientPath

let fableWebpack = fableWebpack' "webpack"
let fableWebpackServer = fableWebpack' "webpack-dev-server"

Server.fs

// Server project

// Fable 2 serialization choice
open Thoth.Json.Giraffe

/// application { service_config config }
let config (s: IServiceCollection) = s.AddSingleton<IJsonSerializer>(ThothSerializer())