File bugzilla-1175274-emacs-27.1.patch of Package anthy

Overview Repositories Revisions Requests Users Attributes Meta

File bugzilla-1175274-emacs-27.1.patch of Package anthy (Revision 2120afb4932d4e4c8fa624eb6a98aede)

Currently displaying revision 2120afb4932d4e4c8fa624eb6a98aede , Show latest

There is no (process-kill-without-query) anymore, use
(set-process-query-on-exit-flag) instead.

---
 src-util/anthy.el |   12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

Index: anthy-9100h/src-util/anthy.el
===================================================================
--- anthy-9100h.orig/src-util/anthy.el
+++ anthy-9100h/src-util/anthy.el
@@ -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 "$B%3%s%F%-%9%H$N(Bid")
@@ -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))

Places

File bugzilla-1175274-emacs-27.1.patch of Package anthy (Revision 2120afb4932d4e4c8fa624eb6a98aede)

Places