From 97b19fb4626dd2a78d52a3e575f7252b67a56787 Mon Sep 17 00:00:00 2001 From: Miro Richard Eklund Date: Wed, 3 May 2017 11:30:28 +0300 Subject: [PATCH] Removed IRequest references and usage from Document/All An recent change (Revision 82ed7c74) to Document/All.scl added IRequest usage and references. IRequest should not be used in Documents/All. 82ed7c74 broke SimupediaServer's Request.scl, since Request.scl uses Document/All and also already had IRequest defined. refs #7173 Change-Id: I15581be91cc98756025afdd6acbf72318de84228 --- .../scl/Document/All.scl | 12 ------------ 1 file changed, 12 deletions(-) diff --git a/bundles/org.simantics.document.server/scl/Document/All.scl b/bundles/org.simantics.document.server/scl/Document/All.scl index 98a632699..fa83a224a 100644 --- a/bundles/org.simantics.document.server/scl/Document/All.scl +++ b/bundles/org.simantics.document.server/scl/Document/All.scl @@ -150,15 +150,3 @@ consoleLog state message = do contextDocument :: CommandContext -> IDocument contextDocument ctx = justValue ctx "__document__" - -importJava "org.simantics.document.server.io.IRequest" where - @private - data IRequest - - @private - getParameter :: IRequest -> String -> Maybe String - -possibleQueryParameterFromContext :: CommandContext -> String -> Maybe String -possibleQueryParameterFromContext context parameter = do - request = fromJust $ possibleValue context "__request__" - getParameter request parameter -- 2.43.2