Index: PlanScan/Main.pas
===================================================================
diff -u -r638 -r640
--- PlanScan/Main.pas	(.../Main.pas)	(revision 638)
+++ PlanScan/Main.pas	(.../Main.pas)	(revision 640)
@@ -58,7 +58,7 @@
   if ParamStr(1) <> '' then
     UiContext.ServerName := Copy(ParamStr(1),Pos('=',ParamStr(1))+1,length(ParamStr(1)))
   else
-    UiContext.ServerName := 'tve-w10';
+    UiContext.ServerName := 'jlm-ws020';
 
   Self.Caption := Self.Caption + ' ' + UiContext.ServerName;