Mercurial Mercurial > hg > stx-libview / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 13 Jan 1997 23:12:32 +0100
changeset 1202 deaeebf2a9b6
parent 1201 6e990cfdd66d
child 1203 49dd13574c7d
checkin from browser
StandardSystemView.st file | annotate | diff | comparison | revisions
StdSysV.st file | annotate | diff | comparison | revisions 
--- a/StandardSystemView.st	Mon Jan 13 23:11:56 1997 +0100
+++ b/StandardSystemView.st	Mon Jan 13 23:12:32 1997 +0100
@@ -1129,7 +1129,7 @@
     extentChanged := false.
     originChanged := false.
 
-    (borderColor notNil and:[borderColor ~~ Black]) ifTrue:[
+    (borderColor notNil and:[borderColor ~= Black]) ifTrue:[
         borderColor := borderColor on:device.
         self setBorderColor
     ].
@@ -1156,8 +1156,8 @@
     ].
     device setWindowClass:('Stx', self className) name:name in:drawableId.
 
-    "Modified: 10.6.1996 / 20:14:37 / cg"
     "Modified: 14.6.1996 / 17:14:25 / stefan"
+    "Modified: 13.1.1997 / 23:10:48 / cg"
 !
 
 realize
@@ -1211,5 +1211,5 @@
 !StandardSystemView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.58 1997-01-10 14:53:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.59 1997-01-13 22:12:32 cg Exp $'
 ! !
--- a/StdSysV.st	Mon Jan 13 23:11:56 1997 +0100
+++ b/StdSysV.st	Mon Jan 13 23:12:32 1997 +0100
@@ -1129,7 +1129,7 @@
     extentChanged := false.
     originChanged := false.
 
-    (borderColor notNil and:[borderColor ~~ Black]) ifTrue:[
+    (borderColor notNil and:[borderColor ~= Black]) ifTrue:[
         borderColor := borderColor on:device.
         self setBorderColor
     ].
@@ -1156,8 +1156,8 @@
     ].
     device setWindowClass:('Stx', self className) name:name in:drawableId.
 
-    "Modified: 10.6.1996 / 20:14:37 / cg"
     "Modified: 14.6.1996 / 17:14:25 / stefan"
+    "Modified: 13.1.1997 / 23:10:48 / cg"
 !
 
 realize
@@ -1211,5 +1211,5 @@
 !StandardSystemView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/StdSysV.st,v 1.58 1997-01-10 14:53:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/StdSysV.st,v 1.59 1997-01-13 22:12:32 cg Exp $'
 ! !
hg/stx-libview