summaryrefslogtreecommitdiffstats
path: root/library/panedwindow.tcl
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 /library/panedwindow.tcl
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.
Diffstat (limited to 'library/panedwindow.tcl')
-rw-r--r--library/panedwindow.tcl20
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.
#