diff options
| -rw-r--r-- | catbird/node-2d.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/catbird/node-2d.scm b/catbird/node-2d.scm index 34c9649..4fb454c 100644 --- a/catbird/node-2d.scm +++ b/catbird/node-2d.scm @@ -1038,7 +1038,8 @@ PADDING on all sides." #:init-keyword #:vertical-align #:observe? #t) (color #:accessor color #:init-keyword #:color #:init-value white #:observe? #t)) -(define-method (on-enter (label <label>)) +(define-method (initialize (label <label>) initargs) + (next-method) (refresh-label label) (realign label)) |