g/j1: fix menu labelling issue in jak1 (#3613)
Some checks are pending
Build / 🖥️ Windows (push) Waiting to run
Build / 🐧 Linux (push) Waiting to run
Build / 🍎 MacOS (push) Waiting to run
Inform Pages Repo / Generate Documentation (push) Waiting to run
Lint / 📝 Formatting (push) Waiting to run
Lint / 📝 Required Checks (push) Waiting to run
Lint / 📝 Optional Checks (push) Waiting to run

Fixes #3393
This commit is contained in:
Tyler Wilding 2024-07-29 21:57:26 -04:00 committed by GitHub
parent e975eab15a
commit d29ab77892
No known key found for this signature in database
GPG key ID: B5690EEEBB952194

View file

@ -1279,7 +1279,7 @@
(set! (-> option bind-info input-idx) i)
(set! (-> option bind-info analog-min-range?) #t)
(set! (-> option option-type) (game-option-type binding-assignment))
(set! (-> option name-override) (-> *analog-bind-names* (* i 2)))
(set! (-> option name-override) (copy-string<-string (-> option name-override) (-> *analog-bind-names* (* i 2))))
(set! (-> option scale) #t)
(1+! (-> *temp-options* length)))
(let ((option (-> *temp-options* (length *temp-options*))))
@ -1290,7 +1290,7 @@
(set! (-> option bind-info input-idx) i)
(set! (-> option bind-info analog-min-range?) #f)
(set! (-> option option-type) (game-option-type binding-assignment))
(set! (-> option name-override) (-> *analog-bind-names* (+ 1 (* i 2))))
(set! (-> option name-override) (copy-string<-string (-> option name-override) (-> *analog-bind-names* (+ 1 (* i 2)))))
(set! (-> option scale) #t)
(1+! (-> *temp-options* length)))))
;; Add Button bindings
@ -1305,7 +1305,7 @@
(set! (-> option bind-info input-idx) i)
(set! (-> option bind-info analog-min-range?) #f)
(set! (-> option option-type) (game-option-type binding-assignment))
(set! (-> option name-override) (-> *button-bind-names* i))
(set! (-> option name-override) (copy-string<-string (-> option name-override) (-> *button-bind-names* i)))
(set! (-> option scale) #t)
(1+! (-> *temp-options* length))))
;; We add a restore defaults button at the bottom of each binding menu