openbsd-ports/inputmethods/anthy/patches/patch-src-util_anthy-dic_el
2022-03-11 19:24:07 +00:00

923 B

Index: src-util/anthy-dic.el
--- src-util/anthy-dic.el.orig
+++ src-util/anthy-dic.el
@@ -1,4 +1,4 @@
-;; anthy-dic.el -- Anthy
+; anthy-dic.el -- Anthy
 
;; Copyright (C) 2001 - 2005
;; Author: Yusuke Tabata<yusuke@w5.dion.ne.jp>
@@ -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> 2:$BCOL>: "))))
(cond ((= cat 1)
(setq res '(("$BIJ;l" "$B?ML>"))))
@@ -113,7 +113,7 @@
(and (string= word "")
(setq word (read-from-minibuffer "$BC18l($B8l44$N$_): ")))
(setq yomi (read-from-minibuffer (concat "$BFI$_ (" word "): ")))
- (setq cat (string-to-int
+ (setq cat (string-to-number
(read-from-minibuffer
"$B%+%F%4%j!< 1:$B0lHLL>;l 2:$B$=$NB>$NL>;l 3:$B7AMF;l 4:$BI{;l: ")))
(cond ((= cat 1)