Changeset 12546


Ignore:
Timestamp:
Aug 6, 2009, 6:10:02 PM (10 years ago)
Author:
rme
Message:

Don't use a baked-in default font, but using just *editor-font* is wrong too.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/cocoa-ide/hemlock-text.lisp

    r12537 r12546  
    343343                                                  *default-paragraph-style*
    344344                                                  #&NSParagraphStyleAttributeName
    345                                                   (#/fontWithName:size: ns:ns-font #@"Inconsolata" 14.0)
     345                                                  *editor-font*
    346346                                                  #&NSFontAttributeName
    347347                                                  +null-ptr+)))
    348348  (let* ((dict (#/dictionaryWithCapacity: ns:ns-mutable-dictionary 8))
    349          (default-font (#/fontWithName:size: ns:ns-font #@"Monaco" 10))
     349         (default-font *editor-font*)   ;what about listeners?
    350350         (fm (#/sharedFontManager ns:ns-font-manager))
    351351         (traits 0)
Note: See TracChangeset for help on using the changeset viewer.