From 03baaa73727f3a6ba720da5f2f9791e2b0e29c57 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Tue, 25 Jan 2022 18:06:55 +0100
Subject: Track time taken for cue transition

---
 guile/starlet/cue-list.scm | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'guile/starlet/cue-list.scm')

diff --git a/guile/starlet/cue-list.scm b/guile/starlet/cue-list.scm
index 016db5f..5a22251 100644
--- a/guile/starlet/cue-list.scm
+++ b/guile/starlet/cue-list.scm
@@ -117,10 +117,6 @@
                         params ...))))
 
 
-;; FIXME!
-(define (cue-total-time the-cue)
-  100)
-
 (define (cue-proc number . args)
   (receive
     (states transition-effects cue-parts rest)
@@ -145,8 +141,6 @@
                                cue-parts
                                (current-cue-clock))))
 
-        (set-clock-expiration-time! (current-cue-clock)
-                                    (cue-total-time the-cue))
         the-cue))))
 
 
-- 
cgit v1.2.3