diff options
| -rw-r--r-- | starling/node-2d.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/starling/node-2d.scm b/starling/node-2d.scm index 30e5549..54d4793 100644 --- a/starling/node-2d.scm +++ b/starling/node-2d.scm @@ -848,7 +848,8 @@ ;;; (define-class <canvas> (<node-2d>) - (painter #:accessor painter #:init-keyword #:painter #:watch? #t) + (painter #:accessor painter #:init-keyword #:painter #:init-value #f + #:watch? #t) (canvas #:accessor canvas #:init-thunk make-empty-canvas)) (define-method (refresh-painter (c <canvas>)) |