--- a/ObjectView.st	Fri Mar 01 15:44:29 2019 +0100
+++ b/ObjectView.st	Fri Mar 01 16:06:12 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -688,7 +690,7 @@
         "
          a local selection - paste with some offset
         "
-        sel size > 0 ifTrue:[
+        sel size ~~ 0 ifTrue:[
             sel := sel collect:[:element |
                 element copy moveTo:(element origin + (8 @ 8))
             ]
@@ -698,7 +700,8 @@
     ].
     self paste:sel
 
-    "Modified: / 4.7.1999 / 15:10:46 / cg"
+    "Modified: / 04-07-1999 / 15:10:46 / cg"
+    "Modified: / 01-03-2019 / 16:05:57 / Claus Gittinger"
 ! !
 
 !ObjectView methodsFor:'dragging-line'!
@@ -2718,7 +2721,7 @@
                 newObject := Object readBinaryFrom:aStream
             ] ifFalse:[
                 chunk := aStream nextChunk.
-                (chunk size > 0) ifTrue:[
+                (chunk size ~~ 0) ifTrue:[
                     newObject := Compiler evaluate:chunk compile:false.
                 ] ifFalse:[
                     newObject := nil
@@ -2738,7 +2741,8 @@
         ]
     ]
 
-    "Modified: / 30.1.1998 / 01:02:16 / cg"
+    "Modified: / 30-01-1998 / 01:02:16 / cg"
+    "Modified: / 01-03-2019 / 16:05:51 / Claus Gittinger"
 !
 
 initializeFileInObject:anObject