;; -*- coding: utf-8 -*- ;;; oald7-pkg.el --- Lookup supplement package for oald7-fpw ;; Copyright (C) 2007 Kazuhiro Ito ;; Author: Kazuhiro Ito ;; Target: ndebs, ndeb, ndtp ;; Format: 1.1 ;; Version: 1.0 ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License ;; as published by the Free Software Foundation; either version 2 ;; of the License, or (at your option) any later version. ;; This program is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License ;; along with this program; if not, write to the Free Software Foundation, ;; Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA ;;; Code: (require 'lookup-package) (defconst oald7-gaiji-table (lookup-new-gaiji-table '( ;; gaiji-table is here. ("ha121" "¯") ("ha122" "°") ("ha123" "²") ("ha124" "·") ;; ("ha124" "・") ("ha125" "¹") ("ha126" "¼") ("ha127" "½") ("ha128" "¾") ("ha129" "Ä") ("ha12a" "Å") ("ha12b" "Æ") ("ha12c" "É") ("ha12d" "Ü") ("ha12e" "à") ("ha12f" "á") ("ha130" "â") ("ha131" "ã") ("ha132" "ä") ("ha133" "å") ("ha134" "æ") ("ha135" "ç") ("ha136" "è") ("ha137" "é") ("ha138" "ê") ("ha139" "ë") ("ha13a" "ì") ("ha13b" "í") ("ha13c" "î") ("ha13d" "ï") ("ha13e" "ð") ("ha13f" "ñ") ("ha140" "ò") ("ha141" "ó") ("ha142" "ô") ("ha143" "ö") ("ha144" "ø") ("ha145" "ù") ("ha146" "ú") ("ha147" "û") ("ha148" "ü") ("ha149" "ý") ("ha14a" "þ") ("ha14b" "ā") ("ha14c" "ă") ("ha14d" "Č") ("ha14e" "č") ("ha14f" "Ē") ("ha150" "ē") ("ha151" "ě") ("ha152" "ĝ") ("ha153" "ġ") ("ha154" "ĩ") ("ha155" "Ī") ("ha156" "ī") ("ha157" "ĭ") ("ha158" "ı") ("ha159" "ł") ("ha15a" "ň") ("ha15b" "ŋ") ("ha15c" "ō") ("ha15d" "œ") ("ha15e" "ř") ("ha15f" "Ś") ("ha160" "ś") ("ha161" "ş") ("ha162" "š") ("ha163" "Ţ") ("ha164" "ũ") ("ha165" "ū") ("ha166" "ŭ") ("ha167" "ů") ("ha168" "ŷ") ("ha169" "ž") ("ha16a" "ǐ") ("ha16b" "ǣ") ("ha16c" "ǧ") ("ha16d" "ǽ") ("ha16e" "ɑ") ("ha16f" "ɒ") ("ha170" "ɔ") ("ha171" "ə") ("ha172" "ɜ") ("ha173" "ɡ") ("ha174" "ɪ") ("ha175" "ɵ") ("ha176" "ʃ") ("ha177" "ʊ") ("ha178" "ʌ") ("ha179" "ʒ") ("ha17a" "ˈ") ;; ("ha17a" "'") ("ha17b" "ˌ") ("ha17c" ":") ("ha17d" "̄") ("ha17e" "̣") ("ha221" "̧") ("ha222" "̱") ("ha223" "͂") ("ha224" "ϒ") ("ha225" "ϕ") ("ha226" "ϵ") ("ha227" "ӯ") ("ha228" "ḇ") ("ha229" "ḍ") ("ha22a" "ḏ") ("ha22b" "ḥ") ("ha22c" "ḳ") ("ha22d" "Ḵ") ("ha22e" "ḵ") ("ha22f" "ḷ") ("ha230" "ṁ") ("ha231" "ṃ") ("ha232" "ṅ") ("ha233" "ṇ") ("ha234" "ṛ") ("ha235" "ṟ") ("ha236" "ṣ") ("ha237" "ṭ") ("ha238" "ṯ") ("ha239" "ẓ") ("ha23a" "ẽ") ;; ("ha23b" "‘") ("ha23b" "'") ;; ("ha23c" "’") ("ha23c" "'") ("ha23d" "⁁") ("ha23e" "⁵") ("ha23f" "₀") ("ha240" "₁") ("ha241" "₂") ("ha242" "₃") ("ha243" "₆") ("ha244" "€") ("ha245" "™") ("ha246" "⅝") ("ha247" "⅞") ("ha248" "∛") ("ha249" "♮") ("ha24a" "✓") ))) (defconst oald7-arranges '(ndeb-arrange-jpeg ndeb-arrange-wave ndeb-arrange-indent ndeb-arrange-scripts ;; ndeb-arrange-ignore ndeb-arrange-prev-next lookup-arrange-references lookup-arrange-gaijis lookup-arrange-default-headings ndeb-arrange-fill-lines)) (defconst oald7-dictionary-options (list (cons ':arranges oald7-arranges) (cons ':gaiji-table oald7-gaiji-table))) (setq lookup-package-dictionary-options-alist (cond ((eq lookup-package-agent 'ndtp) (list (cons "OALD_7/OALD7" oald7-dictionary-options) (cons "OALD_7/OALD7CG" oald7-dictionary-options) (cons "OALD_7/OALD7WF" oald7-dictionary-options))) ((memq lookup-package-agent '(ndeb ndebs)) (list (cons "oald7" oald7-dictionary-options) (cons "oald7cg" oald7-dictionary-options) (cons "oald7wf" oald7-dictionary-options))))) ;; oald7-pkg.el ends