#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 01 Mar 2019 16:13:50 +0100
changeset 6017 4d87665db62d
parent 6016 26f454374801
child 6018 82aee28e50d5
#REFACTORING by cg class: TerminalView changed: #processInput:n: #startSaveAs (send #~~ instead of #>)
TerminalView.st
--- a/TerminalView.st	Fri Mar 01 16:11:10 2019 +0100
+++ b/TerminalView.st	Fri Mar 01 16:13:50 2019 +0100
@@ -2276,11 +2276,12 @@
     |fn|
 
     fn := Dialog requestFileName:'Save received data in file:'.
-    fn size > 0 ifTrue:[
+    fn size ~~ 0 ifTrue:[
         filterStream := fn asFilename writeStream
     ].
 
-    "Created: / 29.4.1999 / 11:06:29 / cg"
+    "Created: / 29-04-1999 / 11:06:29 / cg"
+    "Modified: / 01-03-2019 / 16:13:13 / Claus Gittinger"
 !
 
 stopFilter
@@ -2493,7 +2494,7 @@
                     nFit := numberOfColumns - outstandingLine size - cursorCol - 1.
                     nFit > 0 ifTrue:[
                         access critical:[
-                            outstandingLine size > 0 ifTrue:[
+                            outstandingLine size ~~ 0 ifTrue:[
                                 outstandingLine := outstandingLine , (stringWithOutControl copyTo:nFit).
                             ] ifFalse:[
                                 outstandingLine := (stringWithOutControl copyTo:nFit).
@@ -2541,7 +2542,7 @@
                     ].
 
                     access critical:[
-                        outstandingLine size > 0 ifTrue:[
+                        outstandingLine size ~~ 0 ifTrue:[
                             outstandingLine := outstandingLine , stringWithOutControl.
                         ] ifFalse:[
                             outstandingLine := stringWithOutControl.
@@ -2617,6 +2618,7 @@
     "Created: / 10-06-1998 / 17:26:09 / cg"
     "Modified: / 28-01-2002 / 20:41:36 / micha"
     "Modified: / 30-07-2013 / 10:47:19 / cg"
+    "Modified: / 01-03-2019 / 16:13:17 / Claus Gittinger"
 !
 
 sync