Mercurial Mercurial > hg > stx-libview / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
XftFontDescription.st
changeset 7219 970a3474e5fc
parent 7121 a3833df3f396
child 7221 667f17563aeb
equal deleted inserted replaced
7218:4c15124a9431 7219:970a3474e5fc 
   873 
   873 
   874 onDevice:aGraphicsDevice
 
   874 onDevice:aGraphicsDevice
 
   875     "Create a new XftFont representing the closes font as
 
   875     "Create a new XftFont representing the closes font as
 
   876      myself on aDevice; if one already exists, return the one."
 
   876      myself on aDevice; if one already exists, return the one."
 
   877 
   877 
   878     ^ self onDevice:aGraphicsDevice ifAbsent:nil
 
   878     ^ self onDevice:aGraphicsDevice ifAbsent:self
 
   879 !
 
   879 !
 
   880 
   880 
   881 onDevice:aGraphicsDevice ifAbsent:aBlock
 
   881 onDevice:aGraphicsDevice ifAbsent:aBlock
 
   882     "Create a new XftFont representing the closes font as
 
   882     "Create a new XftFont representing the closes font as
 
   883      myself on aDevice; if one already exists, return the one."
 
   883      myself on aDevice; if one already exists, return the one."
hg/stx-libview