;;; -*-Scheme-*-

(define-widget-type 'toggle "Toggle.h")

(define-widget-class 'toggle 'XwtoggleWidgetClass)

(define-callback 'toggle 'select #f)
(define-callback 'toggle 'release #f)