diff options
Diffstat (limited to 'guile/starlet/scanout.scm')
| -rw-r--r-- | guile/starlet/scanout.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/guile/starlet/scanout.scm b/guile/starlet/scanout.scm index 4b7a2e1..f5f4baa 100644 --- a/guile/starlet/scanout.scm +++ b/guile/starlet/scanout.scm @@ -282,12 +282,12 @@ ;; Update scanout rate every 1000 cycles (if (eq? count 100) - (begin - (set! scanout-freq - (exact->inexact (/ 100 - (- (hirestime) start-time)))) - (scanout-loop ola-client (hirestime) 0 universes)) - (scanout-loop ola-client start-time (+ count 1) universes)))) + (begin + (set! scanout-freq + (exact->inexact (/ 100 + (- (hirestime) start-time)))) + (scanout-loop ola-client (hirestime) 0 universes)) + (scanout-loop ola-client start-time (+ count 1) universes)))) (define (start-ola-output) |