--- a/ListView.st	Mon Feb 08 06:59:31 2016 +0100
+++ b/ListView.st	Thu Feb 11 16:28:54 2016 +0000
@@ -1936,7 +1936,7 @@
     (startLine <= e) ifTrue:[
         x := textStartLeft - viewOrigin x.
         self paint:fg on:bg.
-        "/ dont use list from:to:do:, to allow for subclasses to redefine the enumeration (TableView)
+        "/ don't use list from:to:do:, to allow for subclasses to redefine the enumeration (TableView)
         self from:startLine to:e do:[:line |
             line notNil ifTrue:[
                 "/ remove line's color emphasis, to enforce color.
@@ -3450,7 +3450,7 @@
      need device-font for query
     "
     realFont := gc createFontOnDevice.
-    ^ numLines * fontHeight "dont take font height here - think of LabelAndIcons"
+    ^ numLines * fontHeight "don't take font height here - think of LabelAndIcons"
 "/                            + textStartTop
                             - (lineSpacing // 2)
                             + (realFont descent)