* generic/tkPanedWindow.c (Tk_PanedWindowObjCmd):

	* library/panedwindow.tcl: changed class from PanedWindow to
	Panedwindow to not conflict with existing bwidgets, but also to be
	more regular with other names used in the core.


FossilOrigin-Name: c5e500e1fd18750bd7263ac67fb4c5c7410021bd

1 files changed, 10 insertions, 10 deletions

diff --git a/library/panedwindow.tcl b/library/panedwindow.tcl
index 073c47f..fd454be 100644
--- a/library/panedwindow.tcl
+++ b/library/panedwindow.tcl
@@ -3,21 +3,21 @@
 # This file defines the default bindings for Tk panedwindow widgets and
 # provides procedures that help in implementing those bindings.
 #
-# RCS: @(#) $Id: panedwindow.tcl,v 1.5 2002/02/26 01:06:55 hobbs Exp $
+# RCS: @(#) $Id: panedwindow.tcl,v 1.6 2002/08/08 01:43:31 hobbs Exp $
 #
 
-bind PanedWindow <Button-1> { ::tk::panedwindow::MarkSash %W %x %y 1 }
-bind PanedWindow <Button-2> { ::tk::panedwindow::MarkSash %W %x %y 0 }
+bind Panedwindow <Button-1> { ::tk::panedwindow::MarkSash %W %x %y 1 }
+bind Panedwindow <Button-2> { ::tk::panedwindow::MarkSash %W %x %y 0 }
 
-bind PanedWindow <B1-Motion> { ::tk::panedwindow::DragSash %W %x %y 1 }
-bind PanedWindow <B2-Motion> { ::tk::panedwindow::DragSash %W %x %y 0 }
+bind Panedwindow <B1-Motion> { ::tk::panedwindow::DragSash %W %x %y 1 }
+bind Panedwindow <B2-Motion> { ::tk::panedwindow::DragSash %W %x %y 0 }
 
-bind PanedWindow <ButtonRelease-1> {::tk::panedwindow::ReleaseSash %W 1}
-bind PanedWindow <ButtonRelease-2> {::tk::panedwindow::ReleaseSash %W 0}
+bind Panedwindow <ButtonRelease-1> {::tk::panedwindow::ReleaseSash %W 1}
+bind Panedwindow <ButtonRelease-2> {::tk::panedwindow::ReleaseSash %W 0}
 
-bind PanedWindow <Motion> { ::tk::panedwindow::Motion %W %x %y }
+bind Panedwindow <Motion> { ::tk::panedwindow::Motion %W %x %y }
 
-bind PanedWindow <Leave> { ::tk::panedwindow::Leave %W }
+bind Panedwindow <Leave> { ::tk::panedwindow::Leave %W }
 
 # Initialize namespace
 namespace eval ::tk::panedwindow {}
@@ -139,7 +139,7 @@ proc ::tk::panedwindow::Motion {w x y} {
 # ::tk::panedwindow::Cursor --
 #
 #   Handles returning the normal cursor when we are no longer over the
-#   sash area.  This needs to be done this way, because the PanedWindow
+#   sash area.  This needs to be done this way, because the panedwindow
 #   won't see Leave events when the mouse moves from the sash to a
 #   paned child, although the child does receive an Enter event.
 #