DMARC-Filter:	OpenDMARC Filter v1.4.2 delorie.com 5746khva1370973
Authentication-Results:	delorie.com; dmarc=pass (p=none dis=none) header.from=cygwin.com
Authentication-Results:	delorie.com; spf=pass smtp.mailfrom=cygwin.com
DKIM-Filter:	OpenDKIM Filter v2.11.0 delorie.com 5746khva1370973
Authentication-Results:	delorie.com;
	dkim=pass (1024-bit key, unprotected) header.d=cygwin.com header.i=@cygwin.com header.a=rsa-sha256 header.s=default header.b=MrdnSub5
X-Recipient:	archive-cygwin AT delorie DOT com
DKIM-Filter:	OpenDKIM Filter v2.11.0 sourceware.org 88BCC3858401
DKIM-Signature:	v=1; a=rsa-sha256; c=relaxed/relaxed; d=cygwin.com;
	s=default; t=1754290001;
	bh=GKPLUhfskA+AKcwYICvfiyqCYX9KjlMuumzqY0lJakw=;
	h=Date:To:Subject:List-Id:List-Unsubscribe:List-Archive:List-Post:
	List-Help:List-Subscribe:From:Reply-To:From;
	b=MrdnSub5rRYr/jdfzOybsOgSRY08kUqzAvhYn5te7OkkclGg9E6OyDGnT6ckOwdy2
	cwA2qg1XTtJEiEKczVG9wkphhhYPylnq5stqt2ftC8fApn+mApU8l3Nd0DHbSFTeVW
	mf+WNS32EYwqDyXzYgeRJrA9i8wOnlixWG5mmVGw=
X-Original-To:	cygwin AT cygwin DOT com
Delivered-To:	cygwin AT cygwin DOT com
DMARC-Filter:	OpenDMARC Filter v1.4.2 sourceware.org 803013858CDB
ARC-Filter:	OpenARC Filter v1.0.0 sourceware.org 803013858CDB
ARC-Seal:	i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1754289977; cv=none;
	b=spXJdWqnhuDJcgCYuxbuT5jTU4rgmYcATbaoEM61lA2oOehuFUSGVhbFQJ5WY/wdPprS+v67n37YFeyt6GHDHKd2xvTAjGu0IvUJdwx4ML5n4fwKhhREwdm+CU3J0SYxGg0Sqxog8wH+R1mb+xF4+2Jo/SEPiXy4oOJnUZDqKeA=
ARC-Message-Signature:	i=1; a=rsa-sha256; d=sourceware.org; s=key;
	t=1754289977; c=relaxed/simple;
	bh=48Wl2jIVJ415rpRjH/+IRSBf+TKUKVIBFh5fcfnXAPM=;
	h=Date:Message-ID:From:To:Subject:MIME-Version;
	b=FkFSwpmvUm7TR5kXX6zAmLFlVUXCezY0eS5bQiz27LINBpND+ho4M+/3IgjGt4DRWgdftZu/FsXBKECf1m4q9273pyr9cRJ+spHbOehHPLLSJ6afslXgGqm5fNl6Ofz4vmt6PqIXosKfSoVY9iPcuPd6s5xEwtAMHDTnT6FTxwE=
ARC-Authentication-Results:	i=1; server2.sourceware.org
DKIM-Filter:	OpenDKIM Filter v2.11.0 sourceware.org 803013858CDB
X-Google-DKIM-Signature:	v=1; a=rsa-sha256; c=relaxed/relaxed;
	d=1e100.net; s=20230601; t=1754289976; x=1754894776;
	h=content-disposition:mime-version:organization:subject:to:from
	:message-id:date:x-gm-message-state:from:to:cc:subject:date
	:message-id:reply-to;
	bh=e1zweghBcj3JKToNShhPNo7nN1/7wXKGOWfHJ0e66xU=;
	b=dlRr7PY5qODa7jw8vxJOQ/2ZdSY4Rv5uwpz6v4EZEP8p70ZxuW0lP/GpCDkgVZbdcJ
	kzzYDkOryQLpFUA/5CZJVPwFYS8BoBjQ04NUFa/FpSWBkpvje+m6aGdBgnJ5YIHFLFdQ
	JZc+B3tuSFs6D0ykas0U9knknLPZ1+a/KetNCJTYEIMW3oDQOUAAAQzmGaT0bRt/sAKl
	Er7/k7wPuLleFX6D5GtX9ZP77pgQ7Bp55UTjA5PbUZTnrxP0ASmb8yzff8kgwOqiEnHv
	dL50Pb0to+QihFO1ZPSQaSihcE+Uhygy1jmIVJ0+TreLGe4OqBOoqy60ZEaXFNKH8R4f
	pXyg==
X-Gm-Message-State:	AOJu0YxwjBKStOADFZ54CW8Pi6sl+psm0Nxync4tLoZDsirn10B4j5wq
	35zz1SL+1nGRX/BYC+ThlYLFYWMXFZOSbo/kJ9o3j4afNHU+7/SYVxlY5SURp1s=
X-Gm-Gg:	ASbGncvoz23YYHz3MMI1b/OX82ZneTumrw3mqtTVZIYp1vbP8+re6ziMkEpy2plLjPa
	PAU4M47GzSmKF/7NcCjBthcxkBHXYe5Y2Gwg7PEopszxTPurnKFe7pRLnukzJr0zkirHupmUl8b
	pzIA2d0qhmhOpfQJhkr/qwuBqxNVzTi2sq9zGl0G5SQf2szJUWszc7EsB7icDoufDgi6ldCHct0
	v+K3qQ/cZG3yNWp5knAGGuDXYYVevEZ0WBrca5BpdfnOEiwOeYU56v4FfYCskLWWHq5kjt7q3gK
	3DR5loR3tAekKPZ7VQv7pK8+5iAkPZBkWML3R5CM2jkw722cISo2yu2JBRJIaNil/6pXHJsZ4GK
	cW/UoYs5cjWj1XQwzBezYfAl1FolpK1J3SZHPU1aX
X-Google-Smtp-Source:	AGHT+IEiawwqoeuITYpy3vPjiY6W00Gw5l9QYeSwuzbc+Lbe46+4rEcAUCIKEcRACJaF6nYZbhXhCQ==
X-Received:	by 2002:a17:903:183:b0:23f:d861:bd4b with SMTP id
	d9443c01a7336-24246f1fc43mr135252085ad.5.1754289976420;
	Sun, 03 Aug 2025 23:46:16 -0700 (PDT)
Date:	Mon, 04 Aug 2025 15:46:13 +0900
Message-ID:	<b4mpldbbn4a.fsf@jpl.org>
To:	cygwin AT cygwin DOT com
Subject:	[PATCH] emacs-anthy outdated
Organization:	Emacsen advocacy group
X-Face:	#kKnN,xUnmKia.'[pp`;
	Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk
	B#Fu[*?MZZH AT IkN:!"\w%I_zt>[$nm7nQosZ<3eu; B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw=
	L&i*6&(
MIME-Version:	1.0
X-BeenThere:	cygwin AT cygwin DOT com
X-Mailman-Version:	2.1.30
List-Id:	General Cygwin discussions and problem reports <cygwin.cygwin.com>
List-Archive:	<https://cygwin.com/pipermail/cygwin/>
List-Post:	<mailto:cygwin AT cygwin DOT com>
List-Help:	<mailto:cygwin-request AT cygwin DOT com?subject=help>
List-Subscribe:	<https://cygwin.com/mailman/listinfo/cygwin>,
	<mailto:cygwin-request AT cygwin DOT com?subject=subscribe>
From:	Katsumi Yamaoka via Cygwin <cygwin AT cygwin DOT com>
Reply-To:	Katsumi Yamaoka <yamaoka AT jpl DOT org>
Sender:	"Cygwin" <cygwin-bounces~archive-cygwin=delorie DOT com AT cygwin DOT com>

Hi,

  The emacs-anthy package, that runs with the anthy package, is
probably one of the easiest ways to do writing Japanese text
with Emacs even now.  A thing a user needs to add to the Emacs
init file is just: (require 'anthy)
  However, some modules are outdated and do not work with the
modern Emacs like what Cygwin distributes.  So, I post a minimal
patch to make the emacs-anthy package work.  Where `minimal'
means that it doesn't contain feature modifications of any kind,
and leaves some warnings that Emacs issues when compiling.

Regards,

Note: anthy.elc and anthy-dic.elc should be rebuilt after
applying the patch by M-x byte-compile-file .

(This is the repost of the previous post that contained a patch
as an attachment.  I learned that such one is not acceptable in
this list.)

--8<---------------cut here---------------start------------->8---
--- a/anthy-dic.el	2013-11-01 06:55:43 +0000
+++ b/anthy-dic.el	2025-08-04 05:44:06 +0000
@@ -70,7 +70,7 @@
 (defun anthy-dic-get-special-noun-category (word)
   (let 
       ((res '())
-       (cat (string-to-int
+       (cat (string-to-number
 	     (read-from-minibuffer "1:$B?ML>(B 2:$BCOL>(B: "))))
     (cond ((= cat 1)
 	   (setq res '(("$BIJ;l(B" "$B?ML>(B"))))
@@ -113,7 +113,7 @@
     (and (string= word "")
 	 (setq word (read-from-minibuffer "$BC18l(B($B8l44$N$_(B): ")))
     (setq yomi (read-from-minibuffer (concat "$BFI$_(B (" word "): ")))
-    (setq cat (string-to-int
+    (setq cat (string-to-number
 	       (read-from-minibuffer
 		"$B%+%F%4%j!<(B 1:$B0lHLL>;l(B 2:$B$=$NB>$NL>;l(B 3:$B7AMF;l(B 4:$BI{;l(B: ")))
     (cond ((= cat 1)
--- a/anthy.el	2013-11-01 06:55:43 +0000
+++ b/anthy.el	2025-08-04 05:44:06 +0000
@@ -71,7 +71,7 @@
 (defvar anthy-highlight-face nil)
 (defvar anthy-underline-face nil)
 (copy-face 'highlight 'anthy-highlight-face)
-(set-face-underline-p 'anthy-highlight-face t)
+(set-face-attribute 'anthy-highlight-face nil :underline t)
 (copy-face 'underline 'anthy-underline-face)
 
 ;;
@@ -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))
@@ -864,7 +864,7 @@
 ;; leim $B$N(B activate
 ;;
 (defun anthy-leim-activate (&optional name)
-  (setq inactivate-current-input-method-function 'anthy-leim-inactivate)
+  (setq deactivate-current-input-method-function 'anthy-leim-inactivate)
   (setq anthy-leim-active-p t)
   (anthy-update-mode)
   (when (eq (selected-window) (minibuffer-window))
@@ -874,7 +874,7 @@
 ;; emacs$B$N%P%0Hr$1$i$7$$$G$9(B
 ;;
 (defun anthy-leim-exit-from-minibuffer ()
-  (inactivate-input-method)
+  (deactivate-input-method)
   (when (<= (minibuffer-depth) 1)
     (remove-hook 'minibuffer-exit-hook 'anthy-leim-exit-from-minibuffer)))
 
--8<---------------cut here---------------end--------------->8---

-- 
Problem reports:      https://cygwin.com/problems.html
FAQ:                  https://cygwin.com/faq/
Documentation:        https://cygwin.com/docs.html
Unsubscribe info:     https://cygwin.com/ml/#unsubscribe-simple

- Raw text -