diff options
Diffstat (limited to 'src/bltConfig.C')
| -rw-r--r-- | src/bltConfig.C | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/src/bltConfig.C b/src/bltConfig.C index e341145..a5b72a1 100644 --- a/src/bltConfig.C +++ b/src/bltConfig.C @@ -719,25 +719,6 @@ DoConfig( } break; - case BLT_CONFIG_FONT: - { - Blt_Font font; - - if (objIsEmpty) { - font = NULL; - } else { - font = Blt_AllocFontFromObj(interp, tkwin, objPtr); - if (font == NULL) { - return TCL_ERROR; - } - } - if (*(Blt_Font *)ptr != NULL) { - Blt_FreeFont(*(Blt_Font *)ptr); - } - *(Blt_Font *)ptr = font; - } - break; - case BLT_CONFIG_TK_FONT: { Tk_Font font; @@ -1162,12 +1143,6 @@ FormatConfigValue( case BLT_CONFIG_DOUBLE: return Tcl_NewDoubleObj(*(double *)ptr); - case BLT_CONFIG_FONT: - if (*(Blt_Font *)ptr != NULL) { - string = Blt_NameOfFont(*(Blt_Font *)ptr); - } - break; - case BLT_CONFIG_TK_FONT: if (*(Tk_Font *)ptr != NULL) { string = Tk_NameOfFont(*(Tk_Font *)ptr); @@ -1847,13 +1822,6 @@ Blt_FreeOptions( } break; - case BLT_CONFIG_FONT: - if (*((Blt_Font *) ptr) != None) { - Blt_FreeFont(*((Blt_Font *) ptr)); - *((Blt_Font *) ptr) = NULL; - } - break; - case BLT_CONFIG_TK_FONT: if (*((Tk_Font *) ptr) != None) { Tk_FreeFont(*((Tk_Font *) ptr)); |