Small widget wrapper for Canvas.Hs