Index: UI/Utils/MAppLauncher/MainForm.cls.xml
===================================================================
diff -u -r4632 -r4988
--- UI/Utils/MAppLauncher/MainForm.cls.xml	(.../MainForm.cls.xml)	(revision 4632)
+++ UI/Utils/MAppLauncher/MainForm.cls.xml	(.../MainForm.cls.xml)	(revision 4988)
@@ -436,15 +436,22 @@
 <Implementation><![CDATA[
 
    ;d WLIP^vhDBG(97,"before wait")
- New ClientIP,ComKey,i,UserQuits
+ New ClientIP,ComKey,i,UserQuits,IsQuickStartAllowed,MaxLoop
  Set ClientIP=MApplication.GetClientIP()
+ Set IsQuickStartAllowed=($$$IctUserFromIP(ClientIP)'="")
+
+ Set MaxLoop=50
+ If IsQuickStartAllowed {
+	 Set MaxLoop=10
+ }
+ 
  Set ComKey=$G(^IPCom("IP",ClientIP))
- For i=1:1:50 Quit:(ComKey'="")  Do
+ For i=1:1:MaxLoop Quit:(ComKey'="")  Do
  . Hang 0.1
  . Set ComKey=$G(^IPCom("IP",ClientIP))
  . ;d WLIP^vhDBG(97,i_" wait 0.1 sec")
 
- Set UserQuits=0
+ Set UserQuits=0 || IsQuickStartAllowed
  For  Quit:(ComKey'="")||(UserQuits=1)  Do
  . Hang 1
  . Set ComKey=$G(^IPCom("IP",ClientIP))