--- a/WindowBuilder.st	Fri May 16 17:53:40 2014 +0200
+++ b/WindowBuilder.st	Fri May 16 17:58:08 2014 +0200
@@ -933,27 +933,6 @@
         ].
 
         font isNil ifTrue:[
-            fontOrSymbolOrStyle == #labelFont ifTrue:[
-                ^ Label defaultFont
-            ].
-            fontOrSymbolOrStyle == #buttonFont ifTrue:[
-                ^ Button defaultFont
-            ].
-            fontOrSymbolOrStyle == #listFont ifTrue:[
-                ^ SelectionInListView defaultFont
-            ].
-            fontOrSymbolOrStyle == #menuFont ifTrue:[
-                ^ MenuView defaultFont
-            ].
-            fontOrSymbolOrStyle == #textFont ifTrue:[
-                ^ TextView defaultFont
-            ].
-            fontOrSymbolOrStyle == #inputFont ifTrue:[
-                ^ EditField defaultFont
-            ].
-        ].
-
-        font isNil ifTrue:[
             ('Missing font <1p> in <2p>' expandMacrosWith:fontOrSymbolOrStyle with:application class) errorPrintCR.
         ].
         ^ font.
@@ -1626,10 +1605,10 @@
 !WindowBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.153 2014-03-13 09:51:10 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.154 2014-05-16 15:58:08 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.153 2014-03-13 09:51:10 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.154 2014-05-16 15:58:08 stefan Exp $'
 ! !