summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorhobbs <hobbs>2002-08-08 01:43:31 (GMT)
committerhobbs <hobbs>2002-08-08 01:43:31 (GMT)
commit18eb974ba584e388dc59abc47179ef9b6a3bc92d (patch)
treebb68ed2f81eecf4624bc4c51750be05ee8c1df3f
parent8951188143c30573095acce68c26d3bcf2337656 (diff)
downloadtk-18eb974ba584e388dc59abc47179ef9b6a3bc92d.zip
tk-18eb974ba584e388dc59abc47179ef9b6a3bc92d.tar.gz
tk-18eb974ba584e388dc59abc47179ef9b6a3bc92d.tar.bz2
* 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.
-rw-r--r--generic/tkPanedWindow.c4
-rw-r--r--library/panedwindow.tcl20
2 files changed, 12 insertions, 12 deletions
diff --git a/generic/tkPanedWindow.c b/generic/tkPanedWindow.c
index 253a626..1f5f83c 100644
--- a/generic/tkPanedWindow.c
+++ b/generic/tkPanedWindow.c
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkPanedWindow.c,v 1.7 2002/08/06 14:38:13 dkf Exp $
+ * RCS: @(#) $Id: tkPanedWindow.c,v 1.8 2002/08/08 01:43:31 hobbs Exp $
*/
#include "tkPort.h"
@@ -368,7 +368,7 @@ Tk_PanedWindowObjCmd(clientData, interp, objc, objv)
pwOpts->slaveOpts = Tk_CreateOptionTable(interp, slaveOptionSpecs);
}
- Tk_SetClass(tkwin, "PanedWindow");
+ Tk_SetClass(tkwin, "Panedwindow");
/*
* Allocate and initialize the widget record.
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.
#