diff options
| author | David Thompson <dthompson2@worcester.edu> | 2023-04-30 10:30:02 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2023-04-30 10:30:48 -0400 |
| commit | e76b80ff009eff698ad33d3c6a6357a6f87176dc (patch) | |
| tree | 1ab805a617554aaecd0f522808d884e2937793e8 | |
| parent | be7e9a78a3af99a0a0cb46f4aa6bf2fc43098a0e (diff) | |
Perform an initial container layout on initialize.
| -rw-r--r-- | catbird/ui.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/catbird/ui.scm b/catbird/ui.scm index 19401e4..c6470b6 100644 --- a/catbird/ui.scm +++ b/catbird/ui.scm @@ -135,6 +135,10 @@ (define-class <container> (<node-2d>) (needs-layout? #:accessor needs-layout? #:init-value #t)) +(define-method (initialize (container <container>) initargs) + (next-method) + (layout container)) + (define-method (layout (container <container>)) #t) |