From 173178313e5621443955c9c6fa756ae650865a2b Mon Sep 17 00:00:00 2001 From: Alexander Rosenberg Date: Tue, 11 Feb 2025 14:10:08 -0800 Subject: [PATCH] Disable the mozc fixes --- init.el | 35 ++++++++++++++++++----------------- 1 file changed, 18 insertions(+), 17 deletions(-) diff --git a/init.el b/init.el index bcd19e6..d413965 100644 --- a/init.el +++ b/init.el @@ -569,23 +569,24 @@ With NO-EWW, don't update eww's state." (my/-set-fcitx-enabled t) (my/-set-eww-fcitx-state t)))) (add-function :after after-focus-change-function #'my/-normalize-mozc-state) -(with-eval-after-load 'mozc - (defun my/-fixed-mozc-helper-process-filter (proc output-string) - ;; NOTE this is just a modified version of the origial in mozc.el - ;; If proc is no longer active, just throw away the data. - (when (eq proc mozc-helper-process) - (with-temp-buffer - (insert (concat mozc-helper-process-string-buf output-string)) - (goto-char (point-min)) - (unwind-protect - (while-let ((pos (scan-sexps (point) 1))) - (let* ((msg (buffer-substring-no-properties (point) pos))) - (push msg mozc-helper-process-message-queue) - (goto-char pos))) - (setq mozc-helper-process-string-buf (buffer-substring-no-properties - (point) (point-max))))))) - (advice-add 'mozc-helper-process-filter :override - #'my/-fixed-mozc-helper-process-filter)) +;; fix the helper process failing if mozc is built with debug flags +;; (with-eval-after-load 'mozc +;; (defun my/-fixed-mozc-helper-process-filter (proc output-string) +;; ;; NOTE this is just a modified version of the origial in mozc.el +;; ;; If proc is no longer active, just throw away the data. +;; (when (eq proc mozc-helper-process) +;; (with-temp-buffer +;; (insert (concat mozc-helper-process-string-buf output-string)) +;; (goto-char (point-min)) +;; (unwind-protect +;; (while-let ((pos (scan-sexps (point) 1))) +;; (let* ((msg (buffer-substring-no-properties (point) pos))) +;; (push msg mozc-helper-process-message-queue) +;; (goto-char pos))) +;; (setq mozc-helper-process-string-buf (buffer-substring-no-properties +;; (point) (point-max))))))) +;; (advice-add 'mozc-helper-process-filter :override +;; #'my/-fixed-mozc-helper-process-filter)) ;; migemo (use-package migemo