Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#TUNING by sr
authorsr
Mon, 07 Nov 2016 15:34:56 +0100
changeset 5959 b27a22e16282
parent 5958 138b25592837
child 5960 d5697b81bbe6
#TUNING by sr class: EnterFieldGroup changed: #keyPress:x:y:view:
EnterFieldGroup.st file | annotate | diff | comparison | revisions 
--- a/EnterFieldGroup.st	Fri Nov 04 16:32:13 2016 +0100
+++ b/EnterFieldGroup.st	Mon Nov 07 15:34:56 2016 +0100
@@ -575,7 +575,10 @@
       outside. However, this info is not used by any view currently)"
 
     currentField notNil ifTrue:[
-        currentField keyPress:key x:nil y:nil
+        "/ in case the currentFIeld was destroyed without telling me... (hack fix).
+        currentField device notNil ifTrue:[
+            currentField keyPress:key x:nil y:nil
+        ]
     ]
 
     "Modified: / 18.9.1998 / 20:00:36 / cg"
hg/stx-libwidg