#!/bin/sh
# the next line restarts using wish \
exec wish "$0" "$@"

#  Simple drop test

bind . <Drop> {puts "Received a drop!!\nData Type:%P\nData Size:%Z\nData:%D\nButton:%b\nState:%s\nPos: %x %y\nRootPos: %X %Y"}
