#DOCUMENTATION
authorClaus Gittinger <cg@exept.de>
Mon, 08 Feb 2016 10:04:50 +0100
changeset 5585 c14ee2bcedea
parent 5584 68dbe2a5ea55
child 5586 0f8333c00ca4
#DOCUMENTATION class: ListView comment/format in: #drawFromVisibleLine:to:with:and: #heightOfContents typo
ListView.st
--- a/ListView.st	Mon Feb 08 10:04:26 2016 +0100
+++ b/ListView.st	Mon Feb 08 10:04:50 2016 +0100
@@ -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.
@@ -3457,13 +3457,13 @@
      need device-font for query
     "
     font := font onDevice:device.
-    ^ numLines * fontHeight "dont take font height here - think of LabelAndIcons"
+    ^ numLines * fontHeight "don't take font height here - think of LabelAndIcons"
 "/                            + textStartTop
-			    - (lineSpacing // 2)
-			    + (font descent)
+                            - (lineSpacing // 2)
+                            + (font descent)
 "/                            + (font descent)
 "/                            + (font descent * 2) "makes it look better"
-				.
+                                .
 
 "/    "it used to be that code - which is wrong"
 "/    (nLinesShown == nFullLinesShown) ifTrue:[