multi player / per user playing and translation

private/player-agent-tray.rkt

@@ -1,5 +1,7 @@
 #lang racket/base
 
+(require "translate.rkt")
+
 ;; SDL3 is deliberately loaded dynamically. The GUI agent keeps working
 ;; without the optional Racket package and native SDL3 runtime.
 
@@ -20,11 +22,11 @@
     (define update-trays! (dynamic-require 'sdl3 'update-trays!))
     (define tray-destroy! (dynamic-require 'sdl3 'tray-destroy!))
     (sdl-init! '(video events))
-    (define tray (make-tray #f "RKT Web Player Agent"))
+    (define tray (make-tray #f (tr 'app-title)))
     (define menu (make-tray-menu tray))
-    (define show-entry (insert-tray-entry! menu "RKT Web Player Agent openen"))
+    (define show-entry (insert-tray-entry! menu (tr 'tray-open)))
     (insert-tray-entry! menu #f)
-    (define quit-entry (insert-tray-entry! menu "Afsluiten"))
+    (define quit-entry (insert-tray-entry! menu (tr 'quit)))
     (set-tray-entry-callback! show-entry (lambda (_) (show-window!)))
     (set-tray-entry-callback! quit-entry (lambda (_) (quit!)))
     (tray-controller