From b7c21ec7f3c632eb27c460678d7382bf05eb1d38 Mon Sep 17 00:00:00 2001
From: jenglish <jenglish@flightlab.com>
Date: Wed, 13 Dec 2006 05:36:37 +0000
Subject: Remove nonfunctional code and incorrect comments.

---
 ChangeLog              |  5 +++++
 generic/ttk/ttkTheme.h | 10 +---------
 library/ttk/ttk.tcl    | 40 +---------------------------------------
 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.
-- 
cgit v0.12