summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjenglish <jenglish@flightlab.com>2006-12-13 05:36:37 (GMT)
committerjenglish <jenglish@flightlab.com>2006-12-13 05:36:37 (GMT)
commitb7c21ec7f3c632eb27c460678d7382bf05eb1d38 (patch)
tree13d1fa7408dcb33ad84dbd904c93660662170f14
parent3954c391dbfff265521c67f0ed568ab874b213f1 (diff)
downloadtk-b7c21ec7f3c632eb27c460678d7382bf05eb1d38.zip
tk-b7c21ec7f3c632eb27c460678d7382bf05eb1d38.tar.gz
tk-b7c21ec7f3c632eb27c460678d7382bf05eb1d38.tar.bz2
Remove nonfunctional code and incorrect comments.
-rw-r--r--ChangeLog5
-rw-r--r--generic/ttk/ttkTheme.h10
-rw-r--r--library/ttk/ttk.tcl40
3 files changed, 7 insertions, 48 deletions
diff --git a/ChangeLog b/ChangeLog
index 54ca60e..a23e0d6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2006-12-12 Joe English <jenglish@users.sourceforge.net>
+
+ * library/ttk/ttk.tcl, generic/ttkTheme.c:
+ Remove nonfunctional code.
+
2006-12-12 Mo DeJong <mdejong@users.sourceforge.net>
* win/tkWinButton.c (InitBoxes): Call Tcl_Panic()
diff --git a/generic/ttk/ttkTheme.h b/generic/ttk/ttkTheme.h
index 367c0ee..ff18da8 100644
--- a/generic/ttk/ttkTheme.h
+++ b/generic/ttk/ttkTheme.h
@@ -4,7 +4,7 @@
*
* Copyright (c) 2003 Joe English. Freely redistributable.
*
- * $Id: ttkTheme.h,v 1.6 2006/12/10 19:19:44 jenglish Exp $
+ * $Id: ttkTheme.h,v 1.7 2006/12/13 05:36:38 jenglish Exp $
*/
#ifndef _TTKTHEME
@@ -33,14 +33,6 @@ extern "C" {
#define TTK_VERSION TK_VERSION
#define TTK_PATCH_LEVEL TK_PATCH_LEVEL
-/*
- * Statically branched from tile 0.7.8.
- */
-#ifdef TTK_DEFINE_TILE
-#define TILE_VERSION "0.7.8"
-#define TILE_PATCH_LEVEL TILE_VERSION
-#endif
-
/*------------------------------------------------------------------------
* +++ Defaults for element option specifications.
*/
diff --git a/library/ttk/ttk.tcl b/library/ttk/ttk.tcl
index ed3c92d..5c1b5b2 100644
--- a/library/ttk/ttk.tcl
+++ b/library/ttk/ttk.tcl
@@ -1,5 +1,5 @@
#
-# $Id: ttk.tcl,v 1.2 2006/11/24 18:04:14 jenglish Exp $
+# $Id: ttk.tcl,v 1.3 2006/12/13 05:36:38 jenglish Exp $
#
# Ttk widget set initialization script.
#
@@ -50,44 +50,6 @@ proc ttk::deprecated'warning {old new} {
#
::ttk::deprecated ::ttk::paned ::ttk::panedwindow
-if {[info exists ::ttk::deprecrated] && $::ttk::deprecated} {
- ### Deprecated bits.
- #
-
- namespace eval ::tile {
- # Deprecated namespace. Define these only when requested
- variable library
- if {![info exists library]} {
- set library [file dirname [info script]]
- }
-
- variable version 0.7.8
- }
- package provide tile $::tile::version
-
- ### Widgets.
- # Widgets are all defined in the ::ttk namespace.
- #
- # For compatibility with earlier Tile releases, we temporarily
- # create aliases ::tile::widget, and ::t$widget.
- # Using any of the aliases will issue a warning.
- #
-
- namespace eval ttk {
- variable widgets {
- button checkbutton radiobutton menubutton label entry
- frame labelframe scrollbar
- notebook progressbar combobox separator
- scale
- }
-
- variable wc
- foreach wc $widgets {
- namespace export $wc
- }
- }
-}
-
### ::ttk::ThemeChanged --
# Called from [::ttk::style theme use].
# Sends a <<ThemeChanged>> virtual event to all widgets.