summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjenglish <jenglish@flightlab.com>2006-12-13 17:06:31 (GMT)
committerjenglish <jenglish@flightlab.com>2006-12-13 17:06:31 (GMT)
commit94acb8d71c38b7e493d498a69816f77b520f49f1 (patch)
tree5750b2c23f77580621592431250ee7f66a508fd7 /generic
parentb7c21ec7f3c632eb27c460678d7382bf05eb1d38 (diff)
downloadtk-94acb8d71c38b7e493d498a69816f77b520f49f1.zip
tk-94acb8d71c38b7e493d498a69816f77b520f49f1.tar.gz
tk-94acb8d71c38b7e493d498a69816f77b520f49f1.tar.bz2
Try to straighten out theme loading and selection logic.
Diffstat (limited to 'generic')
-rw-r--r--generic/ttk/ttkClamTheme.c4
-rw-r--r--generic/ttk/ttkElements.c7
2 files changed, 9 insertions, 2 deletions
diff --git a/generic/ttk/ttkClamTheme.c b/generic/ttk/ttkClamTheme.c
index 87e5d23..188e8a0 100644
--- a/generic/ttk/ttkClamTheme.c
+++ b/generic/ttk/ttkClamTheme.c
@@ -1,5 +1,5 @@
/*
- * $Id: ttkClamTheme.c,v 1.2 2006/11/03 03:06:22 das Exp $
+ * $Id: ttkClamTheme.c,v 1.3 2006/12/13 17:06:32 jenglish Exp $
*
* Copyright (C) 2004 Joe English
*
@@ -965,5 +965,7 @@ TtkClamTheme_Init(Tcl_Interp *interp)
Ttk_RegisterLayout(theme, "Horizontal.Sash", HorizontalSashLayout);
Ttk_RegisterLayout(theme, "Vertical.Sash", VerticalSashLayout);
+ Tcl_PkgProvide(interp, "ttk::theme::clam", TTK_VERSION);
+
return TCL_OK;
}
diff --git a/generic/ttk/ttkElements.c b/generic/ttk/ttkElements.c
index 787ea64..e7af248 100644
--- a/generic/ttk/ttkElements.c
+++ b/generic/ttk/ttkElements.c
@@ -1,4 +1,4 @@
-/* $Id: ttkElements.c,v 1.2 2006/11/03 03:06:22 das Exp $
+/* $Id: ttkElements.c,v 1.3 2006/12/13 17:06:32 jenglish Exp $
*
* Copyright (c) 2003, Joe English
*
@@ -1443,6 +1443,11 @@ void TtkRegisterElements(Tcl_Interp *interp)
Ttk_RegisterLayout(theme, "Horizontal.TScale", HorizontalScaleLayout);
Ttk_RegisterLayout(theme, "TSeparator", SeparatorLayout);
Ttk_RegisterLayout(theme, "TSizegrip", SizegripLayout);
+
+ /*
+ * Register "default" as a user-loadable theme (for now):
+ */
+ Tcl_PkgProvide(interp, "ttk::theme::default", TTK_VERSION);
}
/*EOF*/