|
;;; -*-Scheme-*-
|
|
|
|
(define-widget-type 'drawingarea "DrawingA.h")
|
|
|
|
(define-widget-class 'drawing-area 'xmDrawingAreaWidgetClass)
|
|
|
|
(define-callback 'drawing-area 'exposeCallback #t)
|
|
(define-callback 'drawing-area 'inputCallback #t)
|
|
(define-callback 'drawing-area 'resizeCallback #t)
|