- bind $w <Configure> [list panner::resize $w w-event]
- bind $w <ButtonPress> [list panner::press $w %b %x %y]
- bind $w <B1-Motion> [list panner::motion $w %x %y]
- bind $w <B1-ButtonRelease> [list panner::release $w %x %y]
- panner-setcanvas $w $canvas
+ bind $w <Configure> [list panner::_resize $w w-event]
+ bind $w <ButtonPress> [list panner::_press $w %b %x %y]
+ bind $w <B1-Motion> [list panner::_motion $w %x %y]
+ bind $w <B1-ButtonRelease> [list panner::_release $w %x %y]
+ setcanvas $w $canvas