Skip to content

GitLab

I
iTasks-SDK
Commit 32e95d5c authored by Bas Lijnse's avatar Bas Lijnse
Browse files
Options

Updated examples to change in workflow admin ui

parent 95b21fe2
Pipeline #21086 failed with stage
    in 1 minute and 52 seconds
    Hide whitespace changes
    Inline Side-by-side
    Showing with 2 additions and 2 deletions
    Examples/Applications/ShipAdventure/main.icl
    View file @ 32e95d5c
    ......@@ -17,7 +17,7 @@ Start world = doTasks
    ,onRequest "/" (ccMain registerTasks continuousTasks alwaysOnTasks optionalTasks <<@ (Title "C2 System"))
    ,onRequest "/tonic" (tonicDashboard [])
    ,onRequest "/debug" showDebug
    ,onRequest "/adventure" (loginAndManageWork "Adventure")
    ,onRequest "/adventure" (loginAndManageWork "Adventure" Nothing)
    ,onRequest "/alarm" (setSectionDetectors)
    ,onRequest "/log" showLog
    //,onRequest "/devices" (manageDevices True)
    ......
    Examples/Applications/TheTaxMan/TheTaxMan.icl
    View file @ 32e95d5c
    ......@@ -9,7 +9,7 @@ import iTasks.UI.Definition, iTasks.Extensions.Admin.UserAdmin
    Start :: *World -> *World
    Start world = doTasks
    [onStartup (installWorkflows workflows)
    ,onRequest "/" (loginAndManageWork "The Taxman")
    ,onRequest "/" (loginAndManageWork "The Taxman" Nothing)
    ] world
    workflows :: [Workflow]
    ......
    Markdown is supported
    0% or .
    You are about to add 0 people to the discussion. Proceed with caution.
    Finish editing this message first!
    Please register or to comment