--- a/CodeCompletionHelpView.st Sun Sep 01 00:40:03 2013 +0200
+++ b/CodeCompletionHelpView.st Sun Sep 01 01:44:18 2013 +0200
@@ -121,11 +121,12 @@
resizeToFit
"resize myself to make the component view fit"
- |pref|
+ |pref bw|
pref := myView preferredExtent.
- self extent:(pref + (self borderWidth * 2)).
- myView origin:(self borderWidth asPoint).
+ bw := self borderWidth.
+ self extent:(pref + (bw * 2)).
+ myView origin:(bw asPoint).
"Modified: 28.6.1997 / 14:23:49 / cg"
! !
@@ -138,15 +139,25 @@
^ true
"Modified: 12.5.1996 / 21:58:12 / cg"
+!
+
+wantsFocusWithButtonPress
+ "DEFINITELY not, because if we do so,
+ the editView looses focus on click, and sends me to hell
+ in its lost focus handling!!
+ So I will be terminated by a buttonPress, before I get a chance to handle the buttonRelease
+ (in which I fire my action)"
+
+ ^ false
! !
!CodeCompletionHelpView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.1 2013-06-14 14:29:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.2 2013-08-31 23:44:18 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.1 2013-06-14 14:29:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.2 2013-08-31 23:44:18 cg Exp $'
! !