more route tweaks

emiMobileServer/Source/Ws.Server.Module.pas

@@ -68,10 +68,10 @@ var
 begin
   
 
+  // [Route('ws')] on IWebSocketService appends /ws — don't double it here.
   Url := ABaseUrl;
   if not Url.EndsWith('/') then
     Url := Url + '/';
-  Url := Url + SERVER_PATH_SEGMENT;
 
   XDataServer1.BaseUrl := Url;
   XDataServer1.ModelName := AModelName;

emiMobileServer/Source/Ws.Service.pas

@@ -9,7 +9,8 @@ const
   WS_MODEL = 'Ws';
 
 type
-  [ServiceContract, Model(WS_MODEL), Route('')]
+  [ServiceContract, Model(WS_MODEL)]
+  [Route('ws')]
   IWebSocketService = interface(IInvokable)
     ['{673FE678-D9EF-468D-89CB-CEF26E8758BC}']
     [HttpGet, Route('emimobile')]