--- a/Semaphore.st	Tue Sep 20 11:37:33 2016 +0100
+++ b/Semaphore.st	Mon Oct 03 12:44:41 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -512,7 +514,7 @@
 
 setCount:n
     "set the count of the semaphore;
-     thats the number of possible waits, without blocking"
+     that's the number of possible waits, without blocking"
 
     waitingProcesses := nil.
     count := n
@@ -524,7 +526,7 @@
 
 count
     "return the number of 'already-counted' trigger events.
-     Thats the number of waits which will succeed without blocking"
+     That's the number of waits which will succeed without blocking"
 
     ^ count