--- a/UIBuilder.st	Mon May 04 21:35:56 1998 +0200
+++ b/UIBuilder.st	Mon May 11 22:48:34 1998 +0200
@@ -181,7 +181,7 @@
 !UIBuilder methodsFor:'building'!
 
 buildFromSpec:aSpecOrSpecArray
-    |m spec|
+    |spec|
 
     window notNil ifTrue:[
         ^ self buildFromSpec:aSpecOrSpecArray in:window
@@ -197,7 +197,7 @@
 !
 
 buildFromSpec:aSpecArray in:aView
-    |m spec|
+    |spec|
 
     spec := UISpecification from:aSpecArray.
     ^ spec buildViewFor:self in:aView.
@@ -364,6 +364,6 @@
 !UIBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.35 1998-03-11 00:23:26 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.36 1998-05-11 20:48:34 tz Exp $'
 ! !
 UIBuilder initialize!

--- a/XPMReader.st	Mon May 04 21:35:56 1998 +0200
+++ b/XPMReader.st	Mon May 11 22:48:34 1998 +0200
@@ -150,7 +150,7 @@
      srcIndex "{ Class: SmallInteger }"
      dstIndex "{ Class: SmallInteger }"
      colorName monoName greyName grey4Name symbolicName colorMapSize redMap greenMap blueMap
-     charsPerPixel xlation s bitsPerPixel char lineDone maskPixelValue
+     charsPerPixel xlation s bitsPerPixel lineDone maskPixelValue
      state key|
 
     inStream := aStream.
@@ -515,6 +515,6 @@
 !XPMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.37 1998-02-03 17:21:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.38 1998-05-11 20:48:05 tz Exp $'
 ! !
 XPMReader initialize!