Hello Melanie,

this function will return all font names as a list:

(defun fonts () (send-wish "senddatastrings [font families]") (ltk::read-data))

Peter

On Thu, Jul 28, 2011 at 10:49 PM, Melanie Mitchell mm@cs.pdx.edu wrote:

Hello,

I'm trying to use the "create-text" command to place text on a canvas.  One of the configuration options is "font" which takes a font name as an argument.  Does anyone know how to find a list of available font names (on a mac)?  (I'm actually trying to get the text to appear large on the canvas.)

Thanks,

Melanie

---

ltk-user site list ltk-user@common-lisp.net http://common-lisp.net/mailman/listinfo/ltk-user