diff options
| author | Thomas White <taw@physics.org> | 2021-10-19 19:07:16 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2021-10-19 19:07:16 +0200 |
| commit | c5013476ca46313307d2537bb956603fe7dc6cac (patch) | |
| tree | ebd59b966f275ab032cd0d598190b8854c0731fe /examples/show.scm | |
| parent | 730ed8b6b63bb3fdce9db8320e5b37963616e41e (diff) | |
Rename group "floor" to "all-floor".
Because "floor" is already a function.
Diffstat (limited to 'examples/show.scm')
| -rw-r--r-- | examples/show.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/show.scm b/examples/show.scm index 1928e64..fa78b2e 100644 --- a/examples/show.scm +++ b/examples/show.scm @@ -52,7 +52,7 @@ ;; Fixtures can be grouped together (define ltruss (list ltruss1 ltruss2 ltruss3 ltruss4 ltruss5 ltruss6)) (define rtruss (list rtruss1 rtruss2 rtruss3 rtruss4 rtruss5 rtruss6)) -(define floor (list floor1 floor2 floor3 floor4 floor5 floor6)) +(define all-floor (list floor1 floor2 floor3 floor4 floor5 floor6)) (define my-state @@ -121,7 +121,7 @@ #:ready-note 69) (select-on-button controller 34 foh #:ready-note 70) -(select-on-button controller 35 floor +(select-on-button controller 35 all-floor #:ready-note 71) |