-
-importJava "org.simantics.document.server.io.IRequest" where
- @private
- data IRequest
-
- @private
- getParameter :: IRequest -> String -> <Proc> Maybe String
-
-possibleQueryParameterFromContext :: CommandContext -> String -> <Proc> Maybe String
-possibleQueryParameterFromContext context parameter = do
- request = fromJust $ possibleValue context "__request__"
- getParameter request parameter