diff options
| author | David Thompson <dthompson2@worcester.edu> | 2023-05-01 07:32:27 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2023-05-01 07:32:27 -0400 |
| commit | bdb741ebb3a04adb1889a25c8f33c3ac9dff3b8c (patch) | |
| tree | ab5fa467e31cb73e653b2adeff50aa3004d1d8a3 /catbird/ui.scm | |
| parent | 335e8af2ff7467d1f3fad5aed52163492a684ce0 (diff) | |
Remove on-boot and reboot methods.
Diffstat (limited to 'catbird/ui.scm')
| -rw-r--r-- | catbird/ui.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/catbird/ui.scm b/catbird/ui.scm index 326924c..dcac4e7 100644 --- a/catbird/ui.scm +++ b/catbird/ui.scm @@ -347,7 +347,8 @@ (fit-to-children button (padding button)) (show (background-up button))) -(define-method (on-boot (button <button>)) +(define-method (initialize (button <button>) initargs) + (next-method) (let ((bg-up (background-up button)) (bg-down (background-down button)) (bg-over (background-over button))) |