fix(desktop): configure composer spellcheck languages

apps/desktop/src/app/DesktopAppIdentity.test.ts

@@ -40,6 +40,7 @@ const makeElectronAppLayer = (calls: ElectronAppCalls) =>
   Layer.succeed(ElectronApp.ElectronApp, {
     metadata: Effect.die("unexpected metadata read"),
     name: Effect.succeed("T3 Code"),
+    preferredSystemLanguages: Effect.succeed(["en-US"]),
     systemLocale: Effect.succeed("en-US"),
     whenReady: Effect.void,
     quit: Effect.void,

apps/desktop/src/app/DesktopLifecycle.test.ts

@@ -33,6 +33,7 @@ function makeElectronAppLayer(
   return Layer.succeed(ElectronApp.ElectronApp, {
     metadata: Effect.die("unexpected metadata read"),
     name: Effect.succeed("T3 Code"),
+    preferredSystemLanguages: Effect.succeed(["en-US"]),
     systemLocale: Effect.succeed("en-US"),
     whenReady: Effect.void,
     quit,

apps/desktop/src/electron/ElectronApp.test.ts

@@ -8,6 +8,7 @@ const {
   autoUpdaterRemoveListenerMock,
   exitMock,
   getAppPathMock,
+  getPreferredSystemLanguagesMock,
   getSystemLocaleMock,
   getVersionMock,
   isDefaultProtocolClientMock,
@@ -30,6 +31,7 @@ const {
   autoUpdaterRemoveListenerMock: vi.fn(),
   exitMock: vi.fn(),
   getAppPathMock: vi.fn(() => "/app"),
+  getPreferredSystemLanguagesMock: vi.fn(() => ["pt_BR", "en-US"]),
   getSystemLocaleMock: vi.fn(() => "en-GB"),
   getVersionMock: vi.fn(() => "1.2.3"),
   isDefaultProtocolClientMock: vi.fn(() => false),
@@ -62,6 +64,7 @@ vi.mock("electron", () => ({
       setIcon: setDockIconMock,
     },
     getAppPath: getAppPathMock,
+    getPreferredSystemLanguages: getPreferredSystemLanguagesMock,
     getSystemLocale: getSystemLocaleMock,
     getVersion: getVersionMock,
     isDefaultProtocolClient: isDefaultProtocolClientMock,
@@ -122,6 +125,14 @@ describe("ElectronApp", () => {
     }).pipe(Effect.provide(ElectronApp.layer)),
   );
 
+  it.effect("reads and normalizes the OS preferred languages", () =>
+    Effect.gen(function* () {
+      const electronApp = yield* ElectronApp.ElectronApp;
+
+      assert.deepEqual(yield* electronApp.preferredSystemLanguages, ["pt-BR", "en-US"]);
+    }).pipe(Effect.provide(ElectronApp.layer)),
+  );
+
   it.effect("normalizes POSIX-style locale identifiers that Intl rejects", () =>
     Effect.gen(function* () {
       getSystemLocaleMock.mockImplementationOnce(() => "en_GB");

apps/desktop/src/electron/ElectronApp.ts

@@ -50,6 +50,11 @@ export class ElectronApp extends Context.Service<
      * pinned to `en-US` however the machine is configured.
      */
     readonly systemLocale: Effect.Effect<string>;
+    /**
+     * The user's ordered OS language preferences, distinct from the regional
+     * locale. Keyboard input methods are discovered separately.
+     */
+    readonly preferredSystemLanguages: Effect.Effect<readonly string[]>;
     readonly whenReady: Effect.Effect<void, ElectronAppWhenReadyError>;
     readonly quit: Effect.Effect<void>;
     readonly exit: (code: number) => Effect.Effect<void>;
@@ -130,6 +135,9 @@ export const make = ElectronApp.of({
   // (`en_GB`). `Intl` rejects those outright rather than normalizing them, so
   // the tag is normalized here rather than in the renderer that consumes it.
   systemLocale: Effect.sync(() => Electron.app.getSystemLocale().replace(/_/g, "-")),
+  preferredSystemLanguages: Effect.sync(() =>
+    Electron.app.getPreferredSystemLanguages().map((language) => language.replace(/_/g, "-")),
+  ),
   whenReady: Effect.gen(function* () {
     const isPackaged = Electron.app.isPackaged;
     yield* Effect.tryPromise({