mirror of
https://github.com/open-goal/jak-project
synced 2026-06-25 10:12:14 -04:00
[jak3] fix soundless spools always assuming 60fps + [jak2] fix rogue entity error spam on ctywide kill (#4038)
This commit is contained in:
@@ -5654,7 +5654,7 @@
|
||||
:login-func #f
|
||||
:activate-func 'lwide-activate
|
||||
:deactivate-func 'lwide-deactivate
|
||||
:kill-func #f
|
||||
:kill-func 'lwide-kill ;; og:preserve-this required to suppress rogue entity errors
|
||||
:borrow-level (new 'static 'array symbol 2 #f #f)
|
||||
:borrow-display? (new 'static 'array symbol 2 #f #f)
|
||||
:texture-anim-tfrag #f
|
||||
@@ -5710,7 +5710,7 @@
|
||||
:login-func #f
|
||||
:activate-func 'lwide-activate
|
||||
:deactivate-func 'lwide-deactivate
|
||||
:kill-func #f
|
||||
:kill-func 'lwide-kill ;; og:preserve-this required to suppress rogue entity errors
|
||||
:borrow-level (new 'static 'array symbol 2 #f #f)
|
||||
:borrow-display? (new 'static 'array symbol 2 #f #f)
|
||||
:texture-anim-tfrag #f
|
||||
@@ -5766,7 +5766,7 @@
|
||||
:login-func #f
|
||||
:activate-func 'lwide-activate
|
||||
:deactivate-func 'lwide-deactivate
|
||||
:kill-func #f
|
||||
:kill-func 'lwide-kill ;; og:preserve-this required to suppress rogue entity errors
|
||||
:borrow-level (new 'static 'array symbol 2 #f #f)
|
||||
:borrow-display? (new 'static 'array symbol 2 #f #f)
|
||||
:texture-anim-tfrag #f
|
||||
|
||||
@@ -899,6 +899,13 @@
|
||||
(none)
|
||||
)
|
||||
|
||||
;; og:preserve-this required to suppress rogue entity errors
|
||||
(defun lwide-kill ()
|
||||
(format #t "lwide-kill~%")
|
||||
(send-event *traffic-manager* 'kill-all)
|
||||
(none)
|
||||
)
|
||||
|
||||
(defun ctywide-entity-hack ()
|
||||
(with-pp
|
||||
(cond
|
||||
|
||||
@@ -27,6 +27,10 @@
|
||||
(set! *video-mode* 1)
|
||||
(sound-set-fps 50)
|
||||
)
|
||||
;; og:preserve-this added custom case
|
||||
(('custom)
|
||||
(sound-set-fps (-> *pc-settings* target-fps))
|
||||
)
|
||||
)
|
||||
(set-time-ratios *display* (-> *display* dog-ratio))
|
||||
(set! (-> *video-params* reset-video-mode) #t)
|
||||
|
||||
Reference in New Issue
Block a user