diff options
| author | jenglish <jenglish@flightlab.com> | 2006-11-07 03:45:27 (GMT) |
|---|---|---|
| committer | jenglish <jenglish@flightlab.com> | 2006-11-07 03:45:27 (GMT) |
| commit | 643b19451d3b2bd1e080733c4c93c5a9daaad63a (patch) | |
| tree | 8067b063a85bcd662fa0771dc6b6ab068aa3f9f3 /generic/ttk/ttkTheme.c | |
| parent | 4e674e6b1ec465975a7138542ed175cc6f9acda3 (diff) | |
| download | tk-643b19451d3b2bd1e080733c4c93c5a9daaad63a.zip tk-643b19451d3b2bd1e080733c4c93c5a9daaad63a.tar.gz tk-643b19451d3b2bd1e080733c4c93c5a9daaad63a.tar.bz2 | |
Miscellaneous minor changes to re-sync Ttk codebase with Tile CVS:
fix comments damaged by overzealous search-and-destroy;
removed obsolete [style default] synonym for [ttk::style configure];
removed other dead code.
Diffstat (limited to 'generic/ttk/ttkTheme.c')
| -rw-r--r-- | generic/ttk/ttkTheme.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/generic/ttk/ttkTheme.c b/generic/ttk/ttkTheme.c index af33606..cca5d3a 100644 --- a/generic/ttk/ttkTheme.c +++ b/generic/ttk/ttkTheme.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. * - * $Id: ttkTheme.c,v 1.2 2006/11/03 03:06:22 das Exp $ + * $Id: ttkTheme.c,v 1.3 2006/11/07 03:45:28 jenglish Exp $ */ #include <stdlib.h> @@ -504,7 +504,7 @@ void Ttk_RegisterCleanup( * Scheduled as an idle callback; clientData is a StylePackageData *. * * Sends a <<ThemeChanged>> event to every widget in the hierarchy. - * Ttk widgets respond to this by calling the WorldChanged class proc, + * Widgets respond to this by calling the WorldChanged class proc, * which in turn recreates the layout. * * The Tk C API doesn't doesn't provide an easy way to traverse @@ -516,8 +516,7 @@ static void ThemeChangedProc(ClientData clientData) static char ThemeChangedScript[] = "ttk::ThemeChanged"; StylePackageData *pkgPtr = (StylePackageData *)clientData; - if (Tcl_EvalEx(pkgPtr->interp, ThemeChangedScript, -1, TCL_EVAL_GLOBAL) - != TCL_OK) { + if (Tcl_GlobalEval(pkgPtr->interp, ThemeChangedScript) != TCL_OK) { Tcl_BackgroundError(pkgPtr->interp); } pkgPtr->themeChangePending = 0; @@ -1629,8 +1628,6 @@ static struct Ensemble StyleEnsemble[] = { { "layout", StyleLayoutCmd, 0 }, { "theme", 0, StyleThemeEnsemble }, { "element", 0, StyleElementEnsemble }, - - { "default", StyleConfigureCmd, 0 }, /* TEMP: for pre-0.7 compatibility */ { NULL, 0, 0 } }; |