--- a/Ruler.st	Mon Nov 21 17:49:40 1994 +0100
+++ b/Ruler.st	Tue Nov 22 01:29:21 1994 +0100
@@ -23,7 +23,7 @@
 
 a Ruler for page layout.
 
-$Header: /cvs/stx/stx/libwidg2/Ruler.st,v 1.9 1994-11-21 16:49:32 claus Exp $
+$Header: /cvs/stx/stx/libwidg2/Ruler.st,v 1.10 1994-11-22 00:29:21 claus Exp $
 
 written oct 91 by claus
 '!
@@ -200,7 +200,7 @@
     bitGravity := #NorthWest.
 
     self height:(font height + (2 * font descent)). 
-    (Language == #english) ifTrue:[
+    (Smalltalk language == #english) ifTrue:[
 	metric := #inch
     ] ifFalse:[
 	metric := #mm