--- a/BrowserView.st Thu Mar 05 11:18:04 2020 +0100
+++ b/BrowserView.st Thu Mar 05 11:18:13 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
@@ -1890,7 +1892,7 @@
self refetchClass.
self updateCodeView
] ifTrue:[
- self warnObsoleteCode:'the classes definition has changed - reselect to update'.
+ self warnObsoleteCode:'the class''s definition has changed - reselect to update'.
].
"/ restart a highlight process, in case some variable
@@ -3972,7 +3974,7 @@
aStream nextPut:$" ; cr; nextPutLine:' Documentation:'.
aStream cr; nextPutLine:commentOrNil; cr.
aStream nextPutLine:' Notice: '.
- aStream nextPutAll:' the above text has been extracted from the classes '.
+ aStream nextPutAll:' the above text has been extracted from the class''s '.
aStream nextPutLine:(isComment ifTrue:['comment.'] ifFalse:['documentation method.']).
aStream nextPutLine:' Any change in it will be lost if you ''accept'' here.'.
aStream nextPutAll:' To change the '.
@@ -5154,7 +5156,7 @@
self warn:'autoload failed.
Check your source directory and/or
-the abbreviation file for the classes (correct) shortened name.'.
+the abbreviation file for the class''s (correct) shortened name.'.
ex return.
] do:[
|text|
@@ -6260,7 +6262,7 @@
either via the menu or the keyboard (usually CMD-A).
To be nice to others (and yourself later), do not forget to
- add some documentation; preferably under the classes documentation
+ add some documentation; preferably under the class''s documentation
protocol.
(see the `create documentation stubs'' item in the methodList menu.)
"
@@ -12494,7 +12496,7 @@
extractClassAndSelectorFromSelectionInto:aBlock
"given a string which can be either
- 'class>>sel', 'class » sel' or 'class sel',
+ 'class>>sel', 'class » sel' or 'class sel',
extract className and selector,
and call aBlock with the result."