--- 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!