<br />
<b>Deprecated</b>:  The each() function is deprecated. This message will be suppressed on further calls in <b>/home/zhenxiangba/zhenxiangba.com/public_html/phproxy-improved-master/index.php</b> on line <b>456</b><br />
;;; lookup-init.el --- lookup init file

;; Copyright (C) 1999,2000 YAMASHITA Junji

;; Author: YAMASHITA Junji <ysjj@unixuser.org>
;; Keywords: init, dict, lookup
;; Version: $Id: lookup-init.el,v 1.11 2001/11/02 15:19:43 ysjj Exp $
;; Content-Type: text/plain; charset=iso-2022-jp

;;; Commentary:

;;; Code:
(when (and (not (boundp 'debian-emacs-flavor))
	   (= emacs-major-version 21))
  (setq lookup-data-directory "/usr/share/emacs/site-lisp/lookup-el")
  (setq lookup-package-directory (concat lookup-data-directory "/packages")))

(setq lookup-enable-splash nil)

(setq lookup-enable-format t)
(setq lookup-use-bitmap window-system)
(setq lookup-enable-gaiji window-system)

(setq lookup-search-agents
      (append
       (and (file-exists-p "/usr/sbin/ndtpd")
	    '((ndtp "localhost"
		    :select ("chujiten/chujiten"
			     "eijiro/eijiro"
			     "koujien/koujien"
			     "mypaedia/mypaedia"
			     "wdic/wdic"))))
       (and (file-exists-p "/usr/sbin/dictd")
 	    '((ndict "localhost")))
       (and (file-exists-p "/usr/local/staff/share/dict")
	    '((ndic "/usr/local/staff/share/dict"
		    :alias "dict"
		    :select ("eijiro"))))
       '((ndspell))))

;;;; option/package:

;;; ndic+dict:
(lookup-set-dictionary-option "ndic+dict:eijiro" :title "英辞郎")
(lookup-set-dictionary-option "ndic+dict:otojiro" :title "音辞郎")
(lookup-set-dictionary-option "ndic+dict:ryakujiro" :title "略辞郎")
(lookup-set-dictionary-option "ndic+dict:waeijiro" :title "和英辞郎")

;;; ndict+localhost:
;(lookup-set-dictionary-option "ndict+localhost:web1913"
;			      :title "Webster dictionary")
; gcide replace web1913.
(lookup-set-dictionary-option "ndict+localhost:gcide"
			      :title "GNU C.I.D.E")
(lookup-set-dictionary-option "ndict+localhost:devil"
			      :title "The Devil's Dictionary")
(lookup-set-dictionary-option "ndict+localhost:vera"
			      :title "V.E.R.A")
(lookup-use-package "ndict+localhost" "dict-misc")

;;;; ndtp+localhost
(lookup-use-package "ndtp+localhost" "mypaedia-fpw")

;;; mypaedia:
(setq mypaedia-data-directory "/mnt/cdrom/INDEX")
(setq mypaedia-av-directory "/mnt/cdrom/DATA")
(setq play-midi-process "timidity")
(setq play-wav-process (if (eq window-system 'x) "esdplay" "play"))
(setq play-avi-process "xanim")
(setq display-image-process "display")

;;; lookup-init.el ends here