/* + style layout name ?spec?
*/
static int StyleLayoutCmd(
ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[])
{
StylePackageData *pkgPtr = clientData;
Ttk_Theme theme = pkgPtr->currentTheme;
const char *layoutName;
Ttk_LayoutTemplate layoutTemplate;
if (objc < 3 || objc > 4) {
Tcl_WrongNumArgs(interp, 2, objv, "name ?spec?");
return TCL_ERROR;
}
layoutName = Tcl_GetString(objv[2]);
if (objc == 3) {
layoutTemplate = Ttk_FindLayoutTemplate(theme, layoutName);
if (!layoutTemplate) {
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
"Layout %s not found", layoutName));
Tcl_SetErrorCode(interp, "TTK", "LOOKUP", "LAYOUT", layoutName,
NULL);
return TCL_ERROR;
}
Tcl_SetObjResult(interp, Ttk_UnparseLayoutTemplate(layoutTemplate));
} else {
layoutTemplate = Ttk_ParseLayoutTemplate(interp, objv[3]);
if (!layoutTemplate) {
return TCL_ERROR;
}
Ttk_RegisterLayoutTemplate(theme, layoutName, layoutTemplate);
ThemeChanged(pkgPtr);
}
return TCL_OK;
}
void Ttk_RegisterLayout(
Ttk_Theme themePtr, /* Target theme */
const char *layoutName, /* Name of new layout */
Ttk_LayoutSpec specPtr) /* Static layout information */
{
Ttk_LayoutTemplate layoutTemplate = Ttk_BuildLayoutTemplate(specPtr);
Ttk_RegisterLayoutTemplate(themePtr, layoutName, layoutTemplate);
}
void Ttk_RegisterLayouts(Ttk_Theme theme, Ttk_LayoutSpec spec)
{
while (!(spec->opcode & _TTK_LAYOUT_END)) {
Ttk_LayoutTemplate layoutTemplate = Ttk_BuildLayoutTemplate(spec+1);
Ttk_RegisterLayoutTemplate(theme, spec->elementName, layoutTemplate);
do {
++spec;
} while (!(spec->opcode & _TTK_LAYOUT));
}
}
