--- a/TerminalView.st	Tue Feb 24 15:42:07 2015 +0100
+++ b/TerminalView.st	Tue Feb 24 16:47:24 2015 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libwidg2' }"
 
+"{ NameSpace: Smalltalk }"
+
 TextCollector subclass:#TerminalView
 	instanceVariableNames:'inStream outStream readerProcess shellPid kbdSequences
 		escapeSequenceTree currentSequence kbdMap escapeLeadingChars
@@ -2137,6 +2139,13 @@
 
 !TerminalView methodsFor:'queries'!
 
+isKeyboardConsumer
+    "return true, if the receiver is a keyboard consumer;
+     Always return true here"
+
+    ^ true
+!
+
 preferredExtent
     "return my preferred extent - this is computed from my numberOfLines,
      numberOfCols and font size"
@@ -2505,11 +2514,11 @@
 !TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.197 2014-11-15 16:32:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.198 2015-02-24 15:47:24 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.197 2014-11-15 16:32:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.198 2015-02-24 15:47:24 cg Exp $'
 ! !