--- a/FlyByHelp.st Mon Nov 02 13:59:35 2009 +0100
+++ b/FlyByHelp.st Mon Nov 02 15:54:16 2009 +0100
@@ -295,12 +295,10 @@
|wg org p v dev|
-thisContext fullPrintAllOn:Transcript.
+ "/ thisContext fullPrintAllOn:Transcript.
(wg := view windowGroup) notNil ifTrue:[
wg isInModalLoop ifTrue:[
-Transcript showCR:'1'.
wg isModal ifFalse:[
-Transcript showCR:'2'.
^ self
].
].
@@ -384,11 +382,11 @@
!FlyByHelp class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.36 2009-11-02 12:59:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.37 2009-11-02 14:54:16 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.36 2009-11-02 12:59:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.37 2009-11-02 14:54:16 cg Exp $'
! !
FlyByHelp initialize!