🚀 go-pugleaf

This code replaces the previous, erroneous hack at line 392 of emacstool.c
This will provide correct font with for fonts supplied with -Wt <font> 

I also have a version of emacstool/xvetool that uses termsw and allows
follow-mouse for keyboard focus. [The bug in ttysw that currently prevents 
this will be fixed in a coming release of OW.]

    if (bold_name) {
	(void)xv_set(tty_win, TTY_BOLDSTYLE_NAME, bold_name, 0);
    }

    {
	Xv_font font;			/* temporary font variable */
	font = (Xv_font)xv_get (frame, XV_FONT);
	font_height = (int)xv_get (font, FONT_DEFAULT_CHAR_HEIGHT);
	font_width  = (int)xv_get (font, FONT_DEFAULT_CHAR_WIDTH);
    }
    if (console_fd) fprintf(console, "Width = %d\n", font_width);