--- a/Label.st	Thu Jul 07 20:22:10 2016 +0200
+++ b/Label.st	Thu Jul 07 20:22:11 2016 +0200
@@ -92,7 +92,7 @@
     model operation (ST-80 style):
       labels with a model, aspectMsg and labelMsg react to 
       changes of the aspect, and send a labelMsg-message 
-      to the model in order to aquire a new labelString or image.
+      to the model in order to acquire a new labelString or image.
       The model should send 'self changed:aspectMsg' if it thinks the label 
       should change and return a string or image from the labelMsg-message.
 
@@ -140,7 +140,7 @@
                                             default:false.
 
         labelMsg            <Symbol>        if non-nil, this is sent to the model to
-                                            aquire the labelString or labelImage.
+                                            acquire the labelString or labelImage.
                                             If nil, the label stays as is
 
     [styleSheet parameters:]
@@ -634,7 +634,7 @@
 
     concrete example (track a counters value):
       (here, the default aspect #value is used both to notify the label about
-       changes and to aquire a new value from the model).
+       changes and to acquire a new value from the model).
                                                                         [exBegin]
         |top l model|
 
@@ -1304,7 +1304,7 @@
 !
 
 labelMessage 
-    "return the symbol used to aquire the labelString/image from the model
+    "return the symbol used to acquire the labelString/image from the model
      when the aspect changes.
      The default is nil, which means: leave the label unchanged."
 
@@ -1312,12 +1312,12 @@
 !
 
 labelMessage:aSymbol 
-    "set the symbol used to aquire the labelString/image from the model.
+    "set the symbol used to acquire the labelString/image from the model.
      The default is nil, which means: leave the label unchanged."
 
     labelMsg ~~ aSymbol ifTrue:[
-	labelMsg := aSymbol.
-	self getLabelFromModel
+        labelMsg := aSymbol.
+        self getLabelFromModel
     ]
 !
 
@@ -1803,17 +1803,17 @@
      This allows multiple labels to react on the same aspect, 
      but show different labels when changed 
      (also, since labelMsg defaults to nil, constant labels
-      which have a nil labelMsg will not try to aquire a labelString)."
+      which have a nil labelMsg will not try to acquire a labelString)."
 
     |val|
 
     (model notNil 
     and:[labelMsg notNil]) ifTrue:[
-	val := model perform:labelMsg.
-	converter notNil ifTrue:[
-	    val := converter printStringFor:val
-	].
-	self label:val.
+        val := model perform:labelMsg.
+        converter notNil ifTrue:[
+            val := converter printStringFor:val
+        ].
+        self label:val.
     ].
 !