summaryrefslogtreecommitdiffstats
path: root/unix/tkUnixFont.c
diff options
context:
space:
mode:
authorhobbs <hobbs>2003-10-29 01:07:46 (GMT)
committerhobbs <hobbs>2003-10-29 01:07:46 (GMT)
commitfde0eaeb0b6d359445fd39a6562f006fa8529085 (patch)
treeb2de2d8b9a8163ffe93cd5f46ea4345923449311 /unix/tkUnixFont.c
parent4e8215d0d0ef72bb2ac89fdcf5e773ca8e575288 (diff)
downloadtk-fde0eaeb0b6d359445fd39a6562f006fa8529085.zip
tk-fde0eaeb0b6d359445fd39a6562f006fa8529085.tar.gz
tk-fde0eaeb0b6d359445fd39a6562f006fa8529085.tar.bz2
* unix/tkUnixFont.c (GetFontAttributes): place extra check for NULL
family against bad X servers.
Diffstat (limited to 'unix/tkUnixFont.c')
-rw-r--r--unix/tkUnixFont.c9
1 files changed, 8 insertions, 1 deletions
diff --git a/unix/tkUnixFont.c b/unix/tkUnixFont.c
index d29fd9f..22ea02f 100644
--- a/unix/tkUnixFont.c
+++ b/unix/tkUnixFont.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkUnixFont.c,v 1.18.2.2 2003/07/19 01:45:42 hobbs Exp $
+ * RCS: @(#) $Id: tkUnixFont.c,v 1.18.2.3 2003/10/29 01:07:46 hobbs Exp $
*/
#include "tkUnixInt.h"
@@ -2716,6 +2716,13 @@ GetFontAttributes(display, fontStructPtr, faPtr)
} else {
TkInitFontAttributes(&faPtr->fa);
TkInitXLFDAttributes(&faPtr->xa);
+ }
+ /*
+ * Do last ditch check for family. It seems that some X servers can
+ * fail on the X font calls above, slipping through earlier checks.
+ * X-Win32 5.4 is one of these.
+ */
+ if (faPtr->fa.family == NULL) {
faPtr->fa.family = Tk_GetUid("");
faPtr->xa.foundry = Tk_GetUid("");
faPtr->xa.charset = Tk_GetUid("");