aboutsummaryrefslogtreecommitdiff
path: root/guile/starlet/fixture-library
diff options
context:
space:
mode:
Diffstat (limited to 'guile/starlet/fixture-library')
-rw-r--r--guile/starlet/fixture-library/robe.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/guile/starlet/fixture-library/robe.scm b/guile/starlet/fixture-library/robe.scm
index 6e4704a..1dae94b 100644
--- a/guile/starlet/fixture-library/robe.scm
+++ b/guile/starlet/fixture-library/robe.scm
@@ -12,8 +12,8 @@
(attr-continuous 'intensity '(0 100) 0)
(attr-continuous 'pan '(0 540) 270)
(attr-continuous 'tilt '(0 270) 135)
- (attr-boolean 'strobe #f)
- (attr-boolean 'prism #f)
+ (attr-list 'strobe '(#t #f) #f)
+ (attr-list 'prism '(#t #f) #f)
(attr-list 'tungsten-watts-emulation '(750 1000 1200 2000 2500 #f) #f)
(attr-continuous 'cyan '(0 100) 0)
(attr-continuous 'magenta '(0 100) 0)
@@ -53,7 +53,7 @@
(attr-continuous 'intensity '(0 100) 0)
(attr-continuous 'pan '(0 540) 270)
(attr-continuous 'tilt '(0 270) 135)
- (attr-boolean 'strobe #f)
+ (attr-list 'strobe '(#t #f) #f)
(attr-list 'colwheel '(#f red blue orange green amber uv) #f)
(attr-list 'gobo '(#f iris gobo1 gobo2 gobo3 gobo4 gobo5 gobo6) #f)
(attr-list 'beamtype '(beam beamwash beamwashext) 'beam)
@@ -124,7 +124,7 @@
(attr-continuous 'pan '(0 540) 270)
(attr-continuous 'tilt '(0 270) 135)
(attr-list 'colwheel '(#f red blue orange green amber uv) #f)
- (attr-boolean 'prism #f)
+ (attr-list 'prism '(#t #f) #f)
(attr-list 'strobe '(#f #t random zap) #f)
(attr-continuous 'strobe-speed '(0 100) 50)
(attr-continuous 'cyan '(0 100) 0)