diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-15 14:37:22 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-15 14:37:22 (GMT) |
| commit | 382c07bad3e6c138cce5eb70b0745dfd34626143 (patch) | |
| tree | 21019f9bc668c38b9a93f67378efa05983c859cf /generic/ttk | |
| parent | 9233c9a6c721e76ec8b715a9a512049ce7cfb4f2 (diff) | |
| download | tk-382c07bad3e6c138cce5eb70b0745dfd34626143.zip tk-382c07bad3e6c138cce5eb70b0745dfd34626143.tar.gz tk-382c07bad3e6c138cce5eb70b0745dfd34626143.tar.bz2 | |
Eliminate usage of Tcl_PkgProvide/Tcl_PkgRequire functions, use the 'Ex' versions in stead.
Diffstat (limited to 'generic/ttk')
| -rw-r--r-- | generic/ttk/ttkClamTheme.c | 2 | ||||
| -rw-r--r-- | generic/ttk/ttkClassicTheme.c | 2 | ||||
| -rw-r--r-- | generic/ttk/ttkDecls.h | 2 | ||||
| -rw-r--r-- | generic/ttk/ttkDefaultTheme.c | 2 | ||||
| -rw-r--r-- | generic/ttk/ttkElements.c | 2 |
5 files changed, 5 insertions, 5 deletions
diff --git a/generic/ttk/ttkClamTheme.c b/generic/ttk/ttkClamTheme.c index 572f630..fc4f712 100644 --- a/generic/ttk/ttkClamTheme.c +++ b/generic/ttk/ttkClamTheme.c @@ -965,7 +965,7 @@ TtkClamTheme_Init(Tcl_Interp *interp) Ttk_RegisterLayouts(theme, LayoutTable); - Tcl_PkgProvide(interp, "ttk::theme::clam", TTK_VERSION); + Tcl_PkgProvideEx(interp, "ttk::theme::clam", TTK_VERSION, NULL); return TCL_OK; } diff --git a/generic/ttk/ttkClassicTheme.c b/generic/ttk/ttkClassicTheme.c index 2fbcd76..e23ecb3 100644 --- a/generic/ttk/ttkClassicTheme.c +++ b/generic/ttk/ttkClassicTheme.c @@ -505,7 +505,7 @@ MODULE_SCOPE int TtkClassicTheme_Init(Tcl_Interp *interp) */ Ttk_RegisterLayouts(theme, LayoutTable); - Tcl_PkgProvide(interp, "ttk::theme::classic", TTK_VERSION); + Tcl_PkgProvideEx(interp, "ttk::theme::classic", TTK_VERSION, NULL); return TCL_OK; } diff --git a/generic/ttk/ttkDecls.h b/generic/ttk/ttkDecls.h index b7c8de4..5f7cb0c 100644 --- a/generic/ttk/ttkDecls.h +++ b/generic/ttk/ttkDecls.h @@ -13,7 +13,7 @@ extern const char *TtkInitializeStubs( interp, TTK_VERSION, TTK_STUBS_EPOCH, TTK_STUBS_REVISION) #else -#define Ttk_InitStubs(interp) Tcl_PkgRequire(interp, "Ttk", TTK_VERSION, 0) +#define Ttk_InitStubs(interp) Tcl_PkgRequireEx(interp, "Ttk", TTK_VERSION, 0, NULL) #endif diff --git a/generic/ttk/ttkDefaultTheme.c b/generic/ttk/ttkDefaultTheme.c index 0c55651..9f7e621 100644 --- a/generic/ttk/ttkDefaultTheme.c +++ b/generic/ttk/ttkDefaultTheme.c @@ -1122,7 +1122,7 @@ MODULE_SCOPE int TtkAltTheme_Init(Tcl_Interp *interp) Ttk_RegisterElement(interp, theme, "Treeitem.indicator", &TreeitemIndicatorElementSpec, 0); - Tcl_PkgProvide(interp, "ttk::theme::alt", TTK_VERSION); + Tcl_PkgProvideEx(interp, "ttk::theme::alt", TTK_VERSION, NULL); return TCL_OK; } diff --git a/generic/ttk/ttkElements.c b/generic/ttk/ttkElements.c index 22af1d6..c348834 100644 --- a/generic/ttk/ttkElements.c +++ b/generic/ttk/ttkElements.c @@ -1275,7 +1275,7 @@ void TtkElements_Init(Tcl_Interp *interp) /* * Register "default" as a user-loadable theme (for now): */ - Tcl_PkgProvide(interp, "ttk::theme::default", TTK_VERSION); + Tcl_PkgProvideEx(interp, "ttk::theme::default", TTK_VERSION, NULL); } /*EOF*/ |