# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1516959918 -3600
# Node ID d1ad98047781ab58d6647984d78e053dd2ecfeef
# Parent  d5c48c56f43446eb5a9a7e6c78d83bd6407b8663
#FEATURE by cg
class: ActiveHelp
changed: #initiateHelpFor:at:
ignore errors if standAloneApp

diff -r d5c48c56f434 -r d1ad98047781 ActiveHelp.st
--- a/ActiveHelp.st	Wed Jan 24 21:31:28 2018 +0100
+++ b/ActiveHelp.st	Fri Jan 26 10:45:18 2018 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1995 by Claus Gittinger
 	      All Rights Reserved
@@ -712,7 +714,12 @@
      re-negotiation of the displayed helpText 
      (for example in a menu, when the selection changes)"
 
-    self initiateHelpFor:aView at:aPointOrNil now:false
+    "/ in standalone apps, it is better to simply not show the help
+    Error,BreakPointInterrupt handle:[:ex |
+        Smalltalk isStandAloneApp ifFalse:[ex reject].
+    ] do:[
+        self initiateHelpFor:aView at:aPointOrNil now:false
+    ].
 
     "Modified: 28.6.1997 / 14:45:57 / cg"
 !