#!/usr/bin/X11/mofe --f

mPushButton Johann topLevel labelString "ich heie Johann Strau jr"
realize

action Johann override \
    "<Btn1Down>:   exec(rddSetDropData {bist du es?}) Arm() wStartAction() \n\
     <Btn1Up>:	   Activate() Disarm() rddDropAction() \n\
     <Btn1Motion>: rddDragAction()"

rddAddDropHandler Johann {echo message <$DROP>}


