diff -ru anthy-9100h/src-util/anthy.el anthy-9100h-emacs-patch/src-util/anthy.el --- anthy-9100h/src-util/anthy.el 2021-01-04 21:00:02.243639981 +0900 +++ anthy-9100h-emacs-patch/src-util/anthy.el 2021-01-04 22:09:59.950386972 +0900 @@ -161,11 +161,11 @@ ;; From skk-macs.el From viper-util.el. Welcome! (defmacro anthy-deflocalvar (var default-value &optional documentation) - (` (progn - (defvar (, var) (, default-value) - (, (format "%s\n\(buffer local\)" documentation))) - (make-variable-buffer-local '(, var)) - ))) + `(progn + (defvar ,var ,default-value + ,format "%s\n\(buffer local\)" documentation) + (make-variable-buffer-local ',var) + )) ;; buffer local variables (anthy-deflocalvar anthy-context-id nil "コンテキストのid") @@ -745,7 +745,7 @@ (if anthy-agent-process (kill-process anthy-agent-process)) (setq anthy-agent-process proc) - (process-kill-without-query proc) + (set-process-query-on-exit-flag proc nil) (if anthy-xemacs (if (coding-system-p (find-coding-system 'euc-japan)) (set-process-coding-system proc 'euc-japan 'euc-japan)) @@ -892,7 +892,7 @@ ((event-matches-key-specifier-p event 'backspace) 8) (t (char-to-int (event-to-character event))))) - last-command-char)) + last-command-event)) ;; ;;