diff --git a/ase/stx/class.c b/ase/stx/class.c
index 31c908f4..88fc89a8 100644
--- a/ase/stx/class.c
+++ b/ase/stx/class.c
@@ -1,5 +1,5 @@
 /*
- * $Id: class.c,v 1.13 2005-07-03 16:37:01 bacon Exp $
+ * $Id: class.c,v 1.14 2005-07-04 08:37:25 bacon Exp $
  */
 
 #include <xp/stx/class.h>
@@ -105,7 +105,7 @@ xp_word_t xp_stx_lookup_class_variable (
 
 	/* TODO: can a metaclas have class variables? */	
 	if (class_obj->header.class != stx->class_metaclass &&
-	    class_obj->variables != stx->nil) {
+	    class_obj->class_variables != stx->nil) {
 		if (xp_stx_hash_lookup_symbol(stx, 
 			class_obj->class_variables, name) != stx->nil) return class_index;
 	}
diff --git a/ase/test/stx/test.st b/ase/test/stx/test.st
index 74372dd6..6f34b0b2 100644
--- a/ase/test/stx/test.st
+++ b/ase/test/stx/test.st
@@ -10,7 +10,7 @@ perform: method with: x with: y with: z with: a with: b with: c
 	b := -30 xxx nil this.
 	"instanceClass := 10."
 	literals := 20.
-"	Win32Errors := 10."
+	Win32Errors := 10.
 
 	(jjj xxx: 10 xy) zzz: (10 fuck: 20 you: 40) yyy:  kkk.
 	[ spec plus:  20]