1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tkFont.c b/generic/tkFont.c
index 737d04c..cef6f86 100644
--- a/generic/tkFont.c
+++ b/generic/tkFont.c
@@ -1326,6 +1326,7 @@ Tk_GetFontFromObj(
 	    FreeFontObj(objPtr);
 	    fontPtr = NULL;
 	} else if (Tk_Screen(tkwin) == fontPtr->screen) {
+	    fontPtr->resourceRefCount++;
 	    return (Tk_Font) fontPtr;
 	}
     }