PrefWIndow // Add DangerZone page support.

Source/UI/PrefUI/suiPrefPaneDangerZone.swift

@@ -50,8 +50,12 @@ struct suiPrefPaneDangerZone: View {
             mgrPrefs.handleDefaultCandidateFontsByLangIdentifier = selHandleDefaultCandidateFontsByLangIdentifier
           }
         )
-        Text(LocalizedStringKey("This only works since macOS 12 with non-IMK candidate window as an alternative wordaround of Apple Bug Report #FB10978412. Apple should patch that for macOS 11 and later."))
+        Text(
-          .preferenceDescription().fixedSize(horizontal: false, vertical: true)
+          LocalizedStringKey(
+            "This only works since macOS 12 with non-IMK candidate window as an alternative wordaround of Apple Bug Report #FB10978412. Apple should patch that for macOS 11 and later."
+          )
+        )
+        .preferenceDescription().fixedSize(horizontal: false, vertical: true)
       }
     }
   }

Source/WindowControllers/ctlPrefWindow.swift

@@ -18,6 +18,7 @@ extension NSToolbarItem.Identifier {
   fileprivate static let ofExperience = NSToolbarItem.Identifier(rawValue: "tabExperience")
   fileprivate static let ofDictionary = NSToolbarItem.Identifier(rawValue: "tabDictionary")
   fileprivate static let ofKeyboard = NSToolbarItem.Identifier(rawValue: "tabKeyboard")
+  fileprivate static let ofDangerZone = NSToolbarItem.Identifier(rawValue: "tabDangerZone")
 }
 
 // Please note that the class should be exposed using the same class name
@@ -32,11 +33,13 @@ class ctlPrefWindow: NSWindowController {
   @IBOutlet var chkTrad2KangXi: NSButton!
   @IBOutlet var chkTrad2JISShinjitai: NSButton!
   @IBOutlet var lblCurrentlySpecifiedUserDataFolder: NSTextFieldCell!
+  @IBOutlet var tglControlDangerZoneIMKCandidate: NSButton!
 
   @IBOutlet var vwrGeneral: NSView!
   @IBOutlet var vwrExperience: NSView!
   @IBOutlet var vwrDictionary: NSView!
   @IBOutlet var vwrKeyboard: NSView!
+  @IBOutlet var vwrDangerZone: NSView!
 
   var currentLanguageSelectItem: NSMenuItem?
 
@@ -236,6 +239,10 @@ class ctlPrefWindow: NSWindowController {
     }
   }
 
+  @IBAction func updateIMKCandidateEnableStatusAction(_: Any) {
+    NSApplication.shared.terminate(nil)
+  }
+
   @IBAction func clickedWhetherIMEShouldNotFartToggleAction(_: Any) {
     clsSFX.beep()
   }
@@ -329,15 +336,15 @@ extension ctlPrefWindow: NSToolbarDelegate {
   }
 
   func toolbarDefaultItemIdentifiers(_: NSToolbar) -> [NSToolbarItem.Identifier] {
-    [.ofGeneral, .ofExperience, .ofDictionary, .ofKeyboard]
+    [.ofGeneral, .ofExperience, .ofDictionary, .ofKeyboard, .ofDangerZone]
   }
 
   func toolbarAllowedItemIdentifiers(_: NSToolbar) -> [NSToolbarItem.Identifier] {
-    [.ofGeneral, .ofExperience, .ofDictionary, .ofKeyboard]
+    [.ofGeneral, .ofExperience, .ofDictionary, .ofKeyboard, .ofDangerZone]
   }
 
   func toolbarSelectableItemIdentifiers(_: NSToolbar) -> [NSToolbarItem.Identifier] {
-    [.ofGeneral, .ofExperience, .ofDictionary, .ofKeyboard]
+    [.ofGeneral, .ofExperience, .ofDictionary, .ofKeyboard, .ofDangerZone]
   }
 
   @objc func showGeneralView(_: Any?) {
@@ -360,6 +367,11 @@ extension ctlPrefWindow: NSToolbarDelegate {
     window?.toolbar?.selectedItemIdentifier = .ofKeyboard
   }
 
+  @objc func showDangerZOneView(_: Any?) {
+    use(view: vwrDangerZone)
+    window?.toolbar?.selectedItemIdentifier = .ofDangerZone
+  }
+
   func toolbar(
     _: NSToolbar, itemForItemIdentifier itemIdentifier: NSToolbarItem.Identifier,
     willBeInsertedIntoToolbar _: Bool
@@ -413,6 +425,18 @@ extension ctlPrefWindow: NSToolbarDelegate {
         }
         item.action = #selector(showKeyboardView(_:))
 
+      case .ofDangerZone:
+        let title = NSLocalizedString("DangerZone", comment: "")
+        item.label = title
+        if #available(macOS 11.0, *) {
+          item.image = NSImage(
+            systemSymbolName: "hand.raised.circle", accessibilityDescription: "DangerZone Preferences"
+          )
+        } else {
+          item.image = NSImage(named: "PrefToolbar-DangerZone")
+        }
+        item.action = #selector(showDangerZOneView(_:))
+
       default:
         return nil
     }

Source/WindowNIBs/Base.lproj/frmPrefWindow.xib

@@ -14,7 +14,9 @@
                 <outlet property="fontSizePopUpButton" destination="90" id="108"/>
                 <outlet property="lblCurrentlySpecifiedUserDataFolder" destination="REC-r4-T7m" id="eEq-XN-mMq"/>
                 <outlet property="selectionKeyComboBox" destination="uHU-aL-du7" id="cEx-Ui-Phc"/>
+                <outlet property="tglControlDangerZoneIMKCandidate" destination="tglControlDangerZoneIMKCandidate" id="eyT-uP-QU6"/>
                 <outlet property="uiLanguageButton" destination="oS6-u5-7dP" id="V3u-XK-z7G"/>
+                <outlet property="vwrDangerZone" destination="Qd7-ln-nNO" id="8mw-wO-gXS"/>
                 <outlet property="vwrDictionary" destination="Rnp-LM-RIF" id="8gY-ah-RT8"/>
                 <outlet property="vwrExperience" destination="XWo-36-xGi" id="hC5-gV-NWn"/>
                 <outlet property="vwrGeneral" destination="BUt-lg-GPp" id="PC2-Sj-V4Q"/>
@@ -1054,5 +1056,92 @@
             </constraints>
             <point key="canvasLocation" x="-392" y="-704"/>
         </visualEffectView>
+        <visualEffectView blendingMode="behindWindow" material="sidebar" state="followsWindowActiveState" id="Qd7-ln-nNO" userLabel="vwrDangerZone">
+            <rect key="frame" x="0.0" y="0.0" width="445" height="261"/>
+            <autoresizingMask key="autoresizingMask"/>
+            <subviews>
+                <textField verticalHuggingPriority="750" translatesAutoresizingMaskIntoConstraints="NO" id="lblControlDangerZoneTitleDescription" userLabel="lblControlDangerZoneTitleDescription">
+                    <rect key="frame" x="18" y="211" width="409" height="30"/>
+                    <textFieldCell key="cell" scrollable="YES" lineBreakMode="clipping" sendsActionOnEndEditing="YES" alignment="left" id="lblDangerZoneTitleDescription">
+                        <font key="font" metaFont="cellTitle"/>
+                        <string key="title">Warning: This page is for testing future features.
+Features listed here may not work as expected.</string>
+                        <color key="textColor" name="labelColor" catalog="System" colorSpace="catalog"/>
+                        <color key="backgroundColor" name="textBackgroundColor" catalog="System" colorSpace="catalog"/>
+                    </textFieldCell>
+                </textField>
+                <box verticalHuggingPriority="750" boxType="separator" translatesAutoresizingMaskIntoConstraints="NO" id="P1o-bW-Tjn">
+                    <rect key="frame" x="20" y="200" width="405" height="5"/>
+                </box>
+                <button verticalHuggingPriority="750" translatesAutoresizingMaskIntoConstraints="NO" id="tglControlDangerZoneIMKCandidate" userLabel="tglControlDangerZoneIMKCandidate">
+                    <rect key="frame" x="19" y="178.5" width="406" height="17"/>
+                    <constraints>
+                        <constraint firstAttribute="height" constant="16" id="1fy-CP-mlB"/>
+                    </constraints>
+                    <buttonCell key="cell" type="check" title="Use IMK Candidate Window instead (will reboot the IME)" bezelStyle="regularSquare" imagePosition="left" controlSize="small" state="on" inset="2" id="tglDangerZoneIMKCandidate" userLabel="tglDangerZoneIMKCandidate">
+                        <behavior key="behavior" changeContents="YES" doesNotDimImage="YES" lightByContents="YES"/>
+                        <font key="font" metaFont="cellTitle"/>
+                    </buttonCell>
+                    <connections>
+                        <action selector="updateIMKCandidateEnableStatusAction:" target="-2" id="mkT-P8-reE"/>
+                        <binding destination="32" name="value" keyPath="values.UseIMKCandidateWindow" id="XjP-hu-rUm"/>
+                    </connections>
+                </button>
+                <textField wantsLayer="YES" verticalHuggingPriority="750" translatesAutoresizingMaskIntoConstraints="NO" id="lblControlDangerZoneIMKCandidate" userLabel="lblControlDangerZoneIMKCandidate">
+                    <rect key="frame" x="18" y="156" width="409" height="14"/>
+                    <textFieldCell key="cell" sendsActionOnEndEditing="YES" alignment="left" title="Candidate selection keys are not yet available in IMK candidate window." id="lblDangerZoneIMKCandidate">
+                        <font key="font" metaFont="smallSystem"/>
+                        <color key="textColor" name="secondaryLabelColor" catalog="System" colorSpace="catalog"/>
+                        <color key="backgroundColor" name="textBackgroundColor" catalog="System" colorSpace="catalog"/>
+                    </textFieldCell>
+                </textField>
+                <button verticalHuggingPriority="750" translatesAutoresizingMaskIntoConstraints="NO" id="tglControlDangerZoneCandidateFont" userLabel="tglControlDangerZoneCandidateFont">
+                    <rect key="frame" x="19" y="132.5" width="406" height="18"/>
+                    <constraints>
+                        <constraint firstAttribute="height" constant="17" id="eCc-Cc-xvc"/>
+                    </constraints>
+                    <buttonCell key="cell" type="check" title="Use .langIdentifier to handle UI font in candidate window" bezelStyle="regularSquare" imagePosition="left" controlSize="small" state="on" inset="2" id="tglDangerZoneCandidateFont" userLabel="tglDangerZoneCandidateFont">
+                        <behavior key="behavior" changeContents="YES" doesNotDimImage="YES" lightByContents="YES"/>
+                        <font key="font" metaFont="cellTitle"/>
+                    </buttonCell>
+                    <connections>
+                        <binding destination="32" name="value" keyPath="values.HandleDefaultCandidateFontsByLangIdentifier" id="EEd-Z8-b5S"/>
+                    </connections>
+                </button>
+                <textField wantsLayer="YES" verticalHuggingPriority="750" translatesAutoresizingMaskIntoConstraints="NO" id="lblControlDangerZoneCandidateFont" userLabel="lblControlDangerZoneCandidateFont">
+                    <rect key="frame" x="18" y="82" width="409" height="42"/>
+                    <constraints>
+                        <constraint firstAttribute="width" constant="405" id="1OL-J2-FUX"/>
+                    </constraints>
+                    <textFieldCell key="cell" sendsActionOnEndEditing="YES" alignment="left" id="lblDangerZoneCandidateFont">
+                        <font key="font" metaFont="smallSystem"/>
+                        <string key="title">This only works since macOS 12 with non-IMK candidate window as an alternative wordaround of Apple Bug Report #FB10978412. Apple should patch that for macOS 11 and later.</string>
+                        <color key="textColor" name="secondaryLabelColor" catalog="System" colorSpace="catalog"/>
+                        <color key="backgroundColor" name="textBackgroundColor" catalog="System" colorSpace="catalog"/>
+                    </textFieldCell>
+                </textField>
+            </subviews>
+            <constraints>
+                <constraint firstItem="lblControlDangerZoneTitleDescription" firstAttribute="leading" secondItem="Qd7-ln-nNO" secondAttribute="leading" constant="20" symbolic="YES" id="0Ia-ut-ksj"/>
+                <constraint firstItem="tglControlDangerZoneIMKCandidate" firstAttribute="top" secondItem="P1o-bW-Tjn" secondAttribute="bottom" constant="7.5" id="3as-Db-NwQ"/>
+                <constraint firstItem="tglControlDangerZoneIMKCandidate" firstAttribute="leading" secondItem="lblControlDangerZoneIMKCandidate" secondAttribute="leading" id="59X-nd-Otf"/>
+                <constraint firstItem="lblControlDangerZoneIMKCandidate" firstAttribute="leading" secondItem="tglControlDangerZoneCandidateFont" secondAttribute="leading" id="COk-L6-3R8"/>
+                <constraint firstItem="lblControlDangerZoneCandidateFont" firstAttribute="top" secondItem="tglControlDangerZoneCandidateFont" secondAttribute="bottom" constant="8.5" id="EyK-gG-Xhd"/>
+                <constraint firstItem="P1o-bW-Tjn" firstAttribute="trailing" secondItem="tglControlDangerZoneIMKCandidate" secondAttribute="trailing" id="LM7-ov-mng"/>
+                <constraint firstItem="lblControlDangerZoneTitleDescription" firstAttribute="trailing" secondItem="P1o-bW-Tjn" secondAttribute="trailing" id="LqC-ii-aOO"/>
+                <constraint firstAttribute="bottom" relation="lessThanOrEqual" secondItem="lblControlDangerZoneCandidateFont" secondAttribute="bottom" constant="82" id="NVG-bX-Lgd"/>
+                <constraint firstItem="tglControlDangerZoneCandidateFont" firstAttribute="top" secondItem="lblControlDangerZoneIMKCandidate" secondAttribute="bottom" constant="6.5" id="UXh-8X-5wM"/>
+                <constraint firstItem="lblControlDangerZoneTitleDescription" firstAttribute="leading" secondItem="P1o-bW-Tjn" secondAttribute="leading" id="Wc3-Oe-D2E"/>
+                <constraint firstItem="P1o-bW-Tjn" firstAttribute="top" secondItem="lblControlDangerZoneTitleDescription" secondAttribute="bottom" constant="8" symbolic="YES" id="Whf-Gf-g65"/>
+                <constraint firstItem="lblControlDangerZoneIMKCandidate" firstAttribute="top" secondItem="tglControlDangerZoneIMKCandidate" secondAttribute="bottom" constant="8.5" id="awf-DD-u2k"/>
+                <constraint firstItem="P1o-bW-Tjn" firstAttribute="leading" secondItem="tglControlDangerZoneIMKCandidate" secondAttribute="leading" id="f2q-KJ-bvO"/>
+                <constraint firstItem="tglControlDangerZoneCandidateFont" firstAttribute="trailing" secondItem="lblControlDangerZoneCandidateFont" secondAttribute="trailing" id="gWx-J5-kgO"/>
+                <constraint firstItem="tglControlDangerZoneIMKCandidate" firstAttribute="trailing" secondItem="lblControlDangerZoneIMKCandidate" secondAttribute="trailing" id="lQf-A0-TPV"/>
+                <constraint firstItem="tglControlDangerZoneCandidateFont" firstAttribute="leading" secondItem="lblControlDangerZoneCandidateFont" secondAttribute="leading" id="oCd-O4-Qfg"/>
+                <constraint firstItem="lblControlDangerZoneTitleDescription" firstAttribute="top" secondItem="Qd7-ln-nNO" secondAttribute="top" constant="20" symbolic="YES" id="vYg-x4-tfo"/>
+                <constraint firstItem="lblControlDangerZoneIMKCandidate" firstAttribute="trailing" secondItem="tglControlDangerZoneCandidateFont" secondAttribute="trailing" id="z47-zE-rak"/>
+            </constraints>
+            <point key="canvasLocation" x="-393.5" y="-70.5"/>
+        </visualEffectView>
     </objects>
 </document>

Source/WindowNIBs/en.lproj/frmPrefWindow.strings

@@ -102,3 +102,8 @@
 "XqL-rf-X6d.title" = "Space to +cycle pages, Shift+Space to +cycle candidates";
 "xrE-8T-WKO.label" = "Advanced";
 "ZEv-Q2-mYL.title" = "Change user interface language (will reboot the IME).";
+"lblDangerZoneTitleDescription.title" = "Warning: This page is for testing future features. \nFeatures listed here may not work as expected.";
+"tglDangerZoneIMKCandidate.title" = "Use IMK Candidate Window instead (will reboot the IME)";
+"lblDangerZoneIMKCandidate.title" = "Candidate selection keys are not yet available in IMK candidate window.";
+"tglDangerZoneCandidateFont.title" = "Use .langIdentifier to handle UI font in candidate window";
+"lblDangerZoneCandidateFont.title" = "This only works since macOS 12 with non-IMK candidate window as an alternative wordaround of Apple Bug Report #FB10978412. Apple should patch that for macOS 11 and later.";

Source/WindowNIBs/ja.lproj/frmPrefWindow.strings

@@ -102,3 +102,8 @@
 "XqL-rf-X6d.title" = "Space で次のページ、Shift+Space で次の候補文字を";
 "xrE-8T-WKO.label" = "詳細";
 "ZEv-Q2-mYL.title" = "アプリ表示用言語をご指定ください、そして入力アプリは自動的に再起動。";
+"lblDangerZoneTitleDescription.title" = "警告：これからの新機能テストのために作ったページですから、\nここで陳列されている諸機能は予想通り動けるだと思わないでください。";
+"tglDangerZoneIMKCandidate.title" = "IMK 候補陳列ウィンドウを起用（入力アプリは自動的に再起動）";
+"lblDangerZoneIMKCandidate.title" = "IMK 候補陳列ウィンドウで言選り用キーは現時点で利用不可。";
+"tglDangerZoneCandidateFont.title" = "「.langIdentifier」を使って候補陳列ウィンドウのフォントを取り扱う";
+"lblDangerZoneCandidateFont.title" = "これは Apple Bug Report #FB10978412 の臨時対策であり、macOS 12 からの macOS に効き、IMK 以外の候補陳列ウィンドウに作用する。Apple は macOS 11 からの macOS のために該当 Bug を修復すべきである。";

Source/WindowNIBs/zh-Hans.lproj/frmPrefWindow.strings

@@ -102,3 +102,8 @@
 "XqL-rf-X6d.title" = "Space 换下一页，Shift+Space 换选下一个候选字。";
 "xrE-8T-WKO.label" = "进阶";
 "ZEv-Q2-mYL.title" = "变更使用者界面语言，会自动重新启动输入法。";
+"lblDangerZoneTitleDescription.title" = "警告：该页面仅作未来功能测试所用。\n在此列出的功能并非处于完全可用之状态。";
+"tglDangerZoneIMKCandidate.title" = "启用 IMK 选字窗（会自动重启输入法）";
+"lblDangerZoneIMKCandidate.title" = "IMK 选字窗目前暂时无法正常使用选字键。";
+"tglDangerZoneCandidateFont.title" = "使用 .langIdentifier 来管理选字窗的预设介面字型";
+"lblDangerZoneCandidateFont.title" = "该方法是 Apple Bug Report #FB10978412 的保守治疗方案，用来仅针对 macOS 12 开始的系统，且仅对非 IMK 选字窗起作用。Apple 应该对 macOS 11 开始的系统修复这个 Bug。";

Source/WindowNIBs/zh-Hant.lproj/frmPrefWindow.strings

@@ -102,3 +102,8 @@
 "XqL-rf-X6d.title" = "Space 換下一頁，Shift+Space 換選下一個候選字";
 "xrE-8T-WKO.label" = "進階";
 "ZEv-Q2-mYL.title" = "變更使用者介面語言，會自動重新啟動輸入法。";
+"lblDangerZoneTitleDescription.title" = "警告：該頁面僅作未來功能測試所用。\n在此列出的功能並非處於完全可用之狀態。";
+"tglDangerZoneIMKCandidate.title" = "啟用 IMK 選字窗（會自動重啟輸入法）";
+"lblDangerZoneIMKCandidate.title" = "IMK 選字窗目前暫時無法正常使用選字鍵。";
+"tglDangerZoneCandidateFont.title" = "使用 .langIdentifier 來管理選字窗的預設介面字型";
+"lblDangerZoneCandidateFont.title" = "該方法是 Apple Bug Report #FB10978412 的保守治療方案，用來僅針對 macOS 12 開始的系統，且僅對非 IMK 選字窗起作用。Apple 應該對 macOS 11 開始的系統修復這個 Bug。";