diff options
Diffstat (limited to 'guile/starlet/fixture-library/generic.scm')
-rw-r--r-- | guile/starlet/fixture-library/generic.scm | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/guile/starlet/fixture-library/generic.scm b/guile/starlet/fixture-library/generic.scm index b92569d..f90bf3a 100644 --- a/guile/starlet/fixture-library/generic.scm +++ b/guile/starlet/fixture-library/generic.scm @@ -4,16 +4,9 @@ #:export (<generic-dimmer>)) (define-class <generic-dimmer> (<fixture>) - (attributes - #:init-form - (list - - (make <fixture-attribute> - #:name 'intensity - #:range '(0 100) - #:type 'continuous - #:home-value 0)))) + #:init-form (list + (attr-continuous 'intensity '(0 100) 0)))) (define-method (scanout-fixture (fixture <generic-dimmer>) |