ManageBacklogControllers.fs

namespace VersionOne.Arena.Module.ManageBacklog

open System.Reflection

[<assembly: AssemblyVersion("1.0.0.0")>]
[<assembly: AssemblyFileVersion("1.0.0.0")>]
do()

open VersionOne.Arena.Intrastructure.Web

type ManageBacklogController() =
    inherit System.Web.Mvc.Controller()
    member this.Index() = this.View()
    
type public ManageBacklogModule() = 
    inherit DefaultModule<ManageBacklogController>()
    override this.GetBaseControllerRoute() = "ManageBacklog"

namespace VersionOne.Arena.Module.ManageBacklog.Api

open System.Web.Http

type ApiController() =
    inherit System.Web.Http.ApiController()
    member this.Get () = "We got it! Here's your messages!"

    [<HttpGet>]
    member this.ByName name = "Thanks! Here's your name: " + name

    [<HttpGet>]
    member this.Version () = "Version A"

    [<HttpGet>]
    member this.EndPoints () = 
        let items = [|"Get"; "ByName"; "Version"|]
        this.Json(items)