fix typo and simplify
This commit is contained in:
Brent Hickey
2022-07-13 22:21:25 -07:00
committed by GitHub
parent dc652d10c5
commit 8c940ea529
+3 -9
View File
@@ -2781,16 +2781,10 @@
(lambda ((arg0 target)) (let ((f0-3 (seek
(-> arg0 control root-prim local-sphere w)
(the-as float 28672.0)
(* 286720.0 0 (if (or (= (-> *setting-control* current video-mode) '150fps)
(= (-> *setting-control* current video-mode) '100fps)
)
0.016666668
(-> *display* seconds-per-frame)
)
)
)
(* 286720.0 DISPLAY_FPS_RATIO 0.016666668) ;; changed for high fps
)
)
)
)
(set! (-> arg0 control root-prim local-sphere w) f0-3)
f0-3
)