From 932d3b73d7286d82bfb9d795e9d94a1257a9ac35 Mon Sep 17 00:00:00 2001 From: tomo Date: Mon, 26 Jan 2004 16:57:55 +0000 Subject: [PATCH] (ideo-translate-region-into-traditional): Support `<-simplified@JP/Jouyou', `<-simplified@JP' and `<-simplified'. --- ideo-trans.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/ideo-trans.el b/ideo-trans.el index 5055791..6a1a1fd 100644 --- a/ideo-trans.el +++ b/ideo-trans.el @@ -1,6 +1,6 @@ ;;; ideo-trans.el --- Translation utility for Ideographic Strings -;; Copyright (C) 2003 MORIOKA Tomohiko +;; Copyright (C) 2003,2004 MORIOKA Tomohiko ;; Author: MORIOKA Tomohiko ;; Keywords: Ideographs, Character Database, Chaon, CHISE @@ -56,9 +56,12 @@ (while (and (skip-chars-forward "\x00-\xFF") (not (eobp))) (setq chr (char-after)) - (if (setq ret (or (get-char-attribute chr '<-simplified@jp-jouyou) + (if (setq ret (or (get-char-attribute chr '<-simplified@JP/Jouyou) + (get-char-attribute chr '<-simplified@jp-jouyou) + (get-char-attribute chr '<-simplified@JP) (get-char-attribute chr '<-simplified@jp) - (get-char-attribute chr '<-jp-simplified))) + (get-char-attribute chr '<-jp-simplified) + (get-char-attribute chr '<-simplified))) (progn (if (cdr ret) (progn -- 1.7.10.4