--- a/Tools__NewSystemBrowserCodeView.st	Tue Jan 15 17:33:23 2013 +0100
+++ b/Tools__NewSystemBrowserCodeView.st	Thu Jan 17 11:35:08 2013 +0100
@@ -359,6 +359,10 @@
 !
 
 keyPress:key x:x y:y 
+    <resource: #keyboard (#Control_L 
+                          #Tab #Return #BackSpace #Delete
+                          #GoBack)>
+
     (x notNil and:[ y notNil ]) ifTrue:[
         key = #'Control_L' ifTrue:[
             self
@@ -368,7 +372,7 @@
          "key = #Alt_L ifTrue: [self highlightParseTreeNodeAtX: x y: y; redraw]"
     ].
 
-    (#( #Tab #Return #BackSpace ) includes:key) ifTrue:[
+    (#( #Tab #Return #BackSpace #Delete) includes:key) ifTrue:[
         self startParsingProcess
     ].
 
@@ -1025,11 +1029,12 @@
 !NewSystemBrowserCodeView class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowserCodeView.st,v 1.11 2012-09-09 19:17:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowserCodeView.st,v 1.12 2013-01-17 10:35:08 cg Exp $'
 !
 
 version_SVN
     ^ '§Id: Tools__NewSystemBrowserCodeView.st 7486 2009-10-26 22:06:24Z vranyj1 §'
 ! !
 
+
 NewSystemBrowserCodeView initialize!