Rename to Rolladeck

This commit is contained in:
Jaidyn Ann 2024-02-25 19:48:48 -06:00
parent 496f4572e4
commit 4732daf1e7
2 changed files with 2 additions and 2 deletions

View File

@ -121,12 +121,12 @@
(qt:widget (window-contents))) (qt:widget (window-contents)))
;; Return the UIs XML, read from “contacts.ui”. ;; Return the UIs XML, read from “rolladeck.ui”.
;; We could generate this XML ourselves, and write a nice s-expr front-end, ;; We could generate this XML ourselves, and write a nice s-expr front-end,
;; maybe… `o` ;; maybe… `o`
(define (window-contents) (define (window-contents)
(call-with-input-file (call-with-input-file
"rolladecks.ui" "rolladeck.ui"
(lambda (in-port) (read-string #f in-port)))) (lambda (in-port) (read-string #f in-port))))