Tools__FontSettingsApplication.st
changeset 14494 680379a3dbef
parent 14491 272ee29d4494
child 14569 9de61339e34d
equal deleted inserted replaced
14493:c2c143bf52a0 14494:680379a3dbef
   657     MenuView defaultFont:fn.
   657     MenuView defaultFont:fn.
   658     MenuPanel defaultFont:fn.
   658     MenuPanel defaultFont:fn.
   659     NoteBookView defaultFont:fn.
   659     NoteBookView defaultFont:fn.
   660     PullDownMenu defaultFont:fn.
   660     PullDownMenu defaultFont:fn.
   661 
   661 
   662     self writeAspects: #(linuxFontWorkaround) to: currentUserPrefs
   662     self writeAspects: #(linuxFontWorkaround) to: currentUserPrefs.
       
   663 
       
   664     DebugView newDebugger.
   663 
   665 
   664     "Modified: / 10-10-2011 / 12:15:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   666     "Modified: / 10-10-2011 / 12:15:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   665 !
   667 !
   666 
   668 
   667 changeAllFont
   669 changeAllFont
   796 changeToBigFonts
   798 changeToBigFonts
   797     |fixFont variableFont|
   799     |fixFont variableFont|
   798 
   800 
   799 "/    fixFont := (Font family:'courier cew' face:'bold' style:'roman' size:14).
   801 "/    fixFont := (Font family:'courier cew' face:'bold' style:'roman' size:14).
   800 "/    variableFont := (Font family:'arial' face:'bold' style:'roman' size:14).
   802 "/    variableFont := (Font family:'arial' face:'bold' style:'roman' size:14).
   801     fixFont := (TextView defaultFont asSize:14) asFace:'bold'.
   803     fixFont := (TextView defaultFont asSize:16).
   802     variableFont := (Label defaultFont asSize:14) asFace:'bold'.
   804     variableFont := (Label defaultFont asSize:16).
   803     self changeToFix:fixFont variable:variableFont.
   805     self changeToFix:fixFont variable:variableFont.
   804 
   806 
   805     "Created: / 06-02-2012 / 12:12:55 / cg"
   807     "Created: / 06-02-2012 / 12:12:55 / cg"
   806 !
   808 !
   807 
   809 
   843 changeToHugeFonts
   845 changeToHugeFonts
   844     |fixFont variableFont|
   846     |fixFont variableFont|
   845 
   847 
   846 "/    fixFont := (Font family:'courier New' face:'bold' style:'roman' size:16).
   848 "/    fixFont := (Font family:'courier New' face:'bold' style:'roman' size:16).
   847 "/    variableFont := (Font family:'arial' face:'bold' style:'roman' size:16).
   849 "/    variableFont := (Font family:'arial' face:'bold' style:'roman' size:16).
   848     fixFont := (TextView defaultFont asSize:18) asFace:'bold'.
   850     fixFont := (TextView defaultFont asSize:18).
   849     variableFont := (Label defaultFont asSize:18) asFace:'bold'.
   851     variableFont := (Label defaultFont asSize:18).
   850     self changeToFix:fixFont variable:variableFont.
   852     self changeToFix:fixFont variable:variableFont.
   851 
   853 
   852     "Created: / 17-03-2012 / 09:06:18 / cg"
   854     "Created: / 17-03-2012 / 09:06:18 / cg"
   853 !
   855 !
   854 
   856 
  1219 ! !
  1221 ! !
  1220 
  1222 
  1221 !FontSettingsApplication class methodsFor:'documentation'!
  1223 !FontSettingsApplication class methodsFor:'documentation'!
  1222 
  1224 
  1223 version
  1225 version
  1224     ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.5 2014-06-13 13:06:53 cg Exp $'
  1226     ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.6 2014-06-13 21:52:24 cg Exp $'
  1225 !
  1227 !
  1226 
  1228 
  1227 version_CVS
  1229 version_CVS
  1228     ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.5 2014-06-13 13:06:53 cg Exp $'
  1230     ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.6 2014-06-13 21:52:24 cg Exp $'
  1229 ! !
  1231 ! !
  1230 
  1232