--- a/CharacterSetView.st	Fri Feb 13 12:44:04 2004 +0100
+++ b/CharacterSetView.st	Fri Feb 13 12:47:18 2004 +0100
@@ -217,20 +217,6 @@
     wCol := width / 16.
     hRow := height / 16.
 
-    0 to:16 do:[:col |
-        |x|
-
-        x := (col * wCol) rounded asInteger.
-        self displayLineFromX:x y:0 toX:x y:height-1.
-    ].
-
-    0 to:15 do:[:row |
-        |y|
-
-        y := (row * hRow) rounded asInteger.
-        self displayLineFromX:0 y:y toX:width y:y.
-    ].
-
     dY := (hRow - (font height)) // 2 + (font ascent).
 
     0 to:15 do:[:row |
@@ -270,6 +256,20 @@
         ].
     ].
 
+    0 to:16 do:[:col |
+        |x|
+
+        x := (col * wCol) rounded asInteger.
+        self displayLineFromX:x y:0 toX:x y:height-1.
+    ].
+
+    0 to:15 do:[:row |
+        |y|
+
+        y := (row * hRow) rounded asInteger.
+        self displayLineFromX:0 y:y toX:width y:y.
+    ].
+
     "
      (self extent:300@600) open
     "
@@ -335,5 +335,5 @@
 !CharacterSetView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CharacterSetView.st,v 1.9 2004-02-13 11:44:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CharacterSetView.st,v 1.10 2004-02-13 11:47:18 cg Exp $'
 ! !