--- a/ApplicationModel.st	Fri May 16 09:50:17 2014 +0200
+++ b/ApplicationModel.st	Fri May 16 17:53:40 2014 +0200
@@ -591,6 +591,44 @@
     ^ builder resolveFont:aSelector.
 ! !
 
+!ApplicationModel class methodsFor:'font specs'!
+
+buttonFont
+    <resource: #fontSpec>
+
+    ^ Button defaultFont  
+!
+
+inputFont
+    <resource: #fontSpec>
+
+    ^ EditField defaultFont  
+!
+
+labelFont
+    <resource: #fontSpec>
+
+    ^ Label defaultFont  
+!
+
+listFont
+    <resource: #fontSpec>
+
+    ^ SelectionInListView defaultFont  
+!
+
+menuFont
+    <resource: #fontSpec>
+
+    ^ MenuView defaultFont  
+!
+
+textFont
+    <resource: #fontSpec>
+
+    ^ TextView defaultFont  
+! !
+
 !ApplicationModel class methodsFor:'help'!
 
 aboutImage
@@ -4085,11 +4123,11 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.356 2014-03-19 21:25:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.357 2014-05-16 15:53:40 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.356 2014-03-19 21:25:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.357 2014-05-16 15:53:40 stefan Exp $'
 ! !