changed:
authorClaus Gittinger <cg@exept.de>
Wed, 25 Jan 2012 10:43:52 +0100
changeset 4105 a77be3c32b6d
parent 4104 ef36c16b5e40
child 4106 94e77b757100
changed: #escapeSequences: #keyPress:x:y: renamed withEscapes to withoutCEscapes
TerminalView.st
--- a/TerminalView.st	Tue Jan 24 18:16:50 2012 +0100
+++ b/TerminalView.st	Wed Jan 25 10:43:52 2012 +0100
@@ -674,7 +674,7 @@
         Debug ifTrue:[
             Transcript show:'->' ; showCR:seq storeString.
         ].
-        seq := seq withEscapes.
+        seq := seq withoutCEscapes.
 
         inStream nextPutAll:seq.
         localEcho ifTrue:[
@@ -712,7 +712,7 @@
         Debug ifTrue:[
             Transcript show:'->' ; showCR:seq storeString.
         ].
-        inStream nextPutAll:(seq withEscapes).
+        inStream nextPutAll:(seq withoutCEscapes).
         ^ self
     ].
 
@@ -757,7 +757,7 @@
         Transcript show:'unhandled key: '; showCR:rawKey.
     ].
 
-    "Modified: / 5.5.1999 / 18:32:42 / cg"
+    "Modified: / 25-01-2012 / 10:43:06 / cg"
 !
 
 shellTerminated
@@ -1031,7 +1031,7 @@
     codes do:[:specEntry |
         |sequence function|
 
-        sequence := (specEntry at:1) withEscapes.
+        sequence := (specEntry at:1) withoutCEscapes.
         function := specEntry at:2.
 
         tree := escapeSequenceTree.
@@ -1057,7 +1057,7 @@
 
     escapeLeadingChars := escapeLeadingChars asArray
 
-    "Modified: / 9.6.1998 / 19:43:12 / cg"
+    "Modified: / 25-01-2012 / 10:42:46 / cg"
 !
 
 flushInput
@@ -1983,11 +1983,11 @@
 !TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.130 2011-03-24 14:41:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.131 2012-01-25 09:43:52 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.130 2011-03-24 14:41:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.131 2012-01-25 09:43:52 cg Exp $'
 ! !
 
 TerminalView initialize!