1 files changed, 3 insertions, 6 deletions
diff --git a/guile/starlet/fixture-library/adj/mega-tripar-profile.scm b/guile/starlet/fixture-library/adj/mega-tripar-profile.scm
index 6f70d40..90a84f6 100644
--- a/guile/starlet/fixture-library/adj/mega-tripar-profile.scm
+++ b/guile/starlet/fixture-library/adj/mega-tripar-profile.scm
@@ -19,6 +19,7 @@
 ;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
 ;;
 (define-module (starlet fixture-library adj mega-tripar-profile)
+  #:use-module (starlet scanout)
   #:use-module (starlet fixture)
   #:use-module (starlet utils)
   #:use-module (starlet colours)
@@ -32,12 +33,10 @@
 
   <adj-mega-tripar-profile-3ch>
 
-  (list
+  (fixture-attributes
     (attr-continuous 'intensity '(0 100) 0)
     (attr-colour 'colour white))
 
-  (get-attr set-chan8)
-
   (let ((intensity (/ (get-attr 'intensity) 100))
         (rgb (colour-as-rgb (get-attr 'colour))))
     (set-chan8 1 (percent->dmxval8 (* intensity (car rgb))))
@@ -51,12 +50,10 @@
 
   <adj-mega-tripar-profile-4ch>
 
-  (list
+  (fixture-attributes
     (attr-continuous 'intensity '(0 100) 0)
     (attr-colour 'colour white))
 
-  (get-attr set-chan8)
-
   (let ((rgb (colour-as-rgb (get-attr 'colour))))
     (set-chan8 1 (percent->dmxval8 (get-attr 'intensity)))
     (set-chan8 2 (percent->dmxval8 (car rgb)))