diff --git a/japanese/diclookup-emacs20/Makefile b/japanese/diclookup-emacs20/Makefile
new file mode 100644
index 000000000000..d28aa25182a1
--- /dev/null
+++ b/japanese/diclookup-emacs20/Makefile
@@ -0,0 +1,37 @@
+# New ports collection makefile for:	diclookup-mule
+# Version required:	2.3.1beta2
+# Date created:		31 Jan 1998
+# Whom:			Mita Yoshio <mita@jp.FreeBSD.org>
+#
+# $Id$
+#
+
+DISTNAME=	diclookup-mule-2.3.3
+PKGNAME=	ja-diclookup-mule-2.3.3
+CATEGORIES=	japanese
+MASTER_SITES=	ftp://ftp.math.s.chiba-u.ac.jp/tools/diclookup-mule/
+
+PATCH_SITES=	${MASTER_SITES}
+PATCHFILES=	diclookup-mule-2.3.3-wave-patch.gz
+
+MAINTAINER=	mita@jp.FreeBSD.org
+
+RUN_DEPENDS=	${X11BASE}/lib/X11/fonts/non-cjk/fonts.dir:${PORTSDIR}/x11/etlfonts
+BUILD_DEPENDS=	mule:${PORTSDIR}/japanese/mule-wnn4
+
+post-install:
+	${MKDIR} ${PREFIX}/lib/dserver/doc
+	@${SED} s!PREFIX_DIR!${PREFIX}!g ${FILESDIR}/setup-diclookup.sh \
+				> ${PREFIX}/lib/dserver/setup-diclookup.sh
+	@${SED} s!PREFIX_DIR!${PREFIX}!g ${FILESDIR}/deinstall-diclookup.sh \
+				> ${PREFIX}/lib/dserver/deinstall-diclookup.sh
+	${INSTALL_DATA} ${FILESDIR}/README.diclookup-setup.txt \
+				${PREFIX}/lib/dserver/doc
+	${INSTALL_DATA} ${WRKSRC}/README \
+				${PREFIX}/lib/dserver/doc/README.diclookup-mule
+	${INSTALL_DATA} ${WRKSRC}/README.sirup \
+				${PREFIX}/lib/dserver/doc/
+	${INSTALL_DATA} ${WRKSRC}/lib/README \
+			${PREFIX}/lib/dserver/doc/README.diclookup-mule.lib
+
+.include <bsd.port.mk>
diff --git a/japanese/diclookup-emacs20/distinfo b/japanese/diclookup-emacs20/distinfo
new file mode 100644
index 000000000000..7810bee15b1c
--- /dev/null
+++ b/japanese/diclookup-emacs20/distinfo
@@ -0,0 +1,2 @@
+MD5 (diclookup-mule-2.3.3.tar.gz) = 76f01fc26b7fc5fcf2064584bf672549
+MD5 (diclookup-mule-2.3.3-wave-patch.gz) = bad55b2e3aba2a69338a96c95bb70df5
diff --git a/japanese/diclookup-emacs20/files/README.diclookup-setup.txt b/japanese/diclookup-emacs20/files/README.diclookup-setup.txt
new file mode 100644
index 000000000000..f1c653b36723
--- /dev/null
+++ b/japanese/diclookup-emacs20/files/README.diclookup-setup.txt
@@ -0,0 +1,140 @@
+		Configuration of diclookup-mule FreeBSD port
+							    7.Jun.1998
+					   MITA Yoshio <mita@jp.FreeBSD.org>
+		  Special thanks to MIHIRA Yoshiro <sanpei@yy.cs.keio.ac.jp>
+
+`Diclookup-mule' is a frontend interface for NDTP (Network Dictionary
+Transfer Protocol) server on mule.
+One of mule (ja-*mule-2.3 or mule-2.3) is necessary for this program.
+
+1. NDTP server installation.
+
+    An NDTP server must therfore be installed.
+    Two programs are known as NDTP server: dserver and ndtpd.
+
+    dserver:  Dictionary server.  NDTP has been a protocol for dserver.
+	      It supports EB/EBG/EBXA/EPWING CDROM dictionaries.
+	      FreeBSD port is ready for installation: ja-dserver-2.2.2
+	      Dserver packages includes `dictionary file compression tool'
+
+    ndtpd:    Dserver-compatible Network Dictionary server.  
+	      It also supports EB/EBG/EBXA/EPWING CDROM dictionaries.
+    Also refer documents to each packages for setup of server.
+
+1. Add startup code to site-start.el
+    Typing
+	% /usr/local/lib/dserver/setup-diclookup.sh
+    displays you `ja-diclookup setup dialog':
+     ------------------------ja-diclookup setup --------------------------
+     |                                                                   |
+     | You have to install appropreate startup code for diclookup-mule.  |
+     | This setup script automatically it to:                            |
+     | /usr/local/lib/mule/site-lisp/site-start.el.                      |
+     |                                                                   |
+     | Are you sure?                                                     |
+     |-------------------------------------------------------------------|
+     |                       [ Yes ]         No                          |
+     |-------------------------------------------------------------------|
+	By answering [ Yes ], startup code is automatically added to
+	/usr/local/lib/mule/site-lisp/site-start.el
+	(Deinstallation is possible by deinstall-diclookup.sh)
+
+2. Usage.
+    Typing `M-x diclookup-mule' launches a new window for dictionary looking up.
+	f`word for looking up'[Enter] : Lookup a word
+	C`dictionary name'[Enter]     : Change dictionary (TAB complition OK)
+	o			      : Switch to other window
+	n,p,[ENTER]		      : Move cursor in window.
+	Q		              : Quit and delete window.
+	q			      : Suspend
+
+
+                 Dserver FreeBSD portセットアップについて．
+
+                                                             3.Nov.1996
+						Revised	    20.Dec.1996
+						Revised	    31.Jan.1998
+                                         三田吉郎 <mita@jp.FreeBSD.org>
+
+
+	目次
+	0. diclookup-mule 使用の前に.
+	I. 起動の準備.
+	   I.1. setup.sh の具体的な作業
+	II. 削除(uninstall)
+
+diclookup-mule は, mule の上で, 電子辞書を引けるようにするための
+プログラムです. これ単体で電子辞書が引けるのではなく, 辞書サーバと
+辞書 CDROM (とmule)とを正しくインストールして, はじめて使えるように
+なります.  とはいえ, 全く難しくありませんので, 御安心を.
+
+0. diclookup-mule 使用の前に.
+    NDTP (Network 辞書転送プロトコル)サーバをインストールして, 動作するように
+    しておくことが必須です.
+    NDTP サーバとしては, 老舗の dserver や, SRA の笠原さんが開発なさっている 
+    ndtpd などが知られています. 
+    dserver は, ja-dserver-2.2.2 というパッケージになっています.
+    ndtp も近日 FreeBSD ports colleciton に取り込まれることでしょう.
+    
+    dserver または, ndtp の設定は, それぞれのパッケージに附属の
+    文書を参照してください.
+    
+I. 起動の準備.
+
+    ~/.emacs もしくは ${PREFIX}/lib/mule/site-lisp/site-start.el などの,
+    初期設定ファイルに, diclookup-mule 起動のためのエントリを追加します.
+    [${PREFIX}/lib/dserver/setup-diclookup.sh] を起動すると, 自動的に
+   設定をsite-start.el に追加してくれます．
+
+  ※ ${PREFIX}
+     ここで ${PREFIX} とは ports をコンパイル時の環境変数 PREFIX を
+     示します. packages では, [/usr/local] となります.  上記の場合,
+     [/usr/local/lib/dserver/setup-diclookup.sh] と適時読みかえてください. 
+
+II. site-start.el の再編集.
+
+   setup-diclookup.sh を起動すれば, 自動的に設定を追加してくれるのですが,
+   一点だけ修正するところがあります.
+   ${PREFIX}/lib/mule/site-lisp/site-start.el の次の行です.
+
+--------
+(setq od-dictfile-list '("od-chujiten" "od-kojien" "od-readers" "od-crown")) ; diclookup-mule
+--------
+
+   この行では, 使用する辞書 CDROM の中に埋め込まれている外字と, mule で表示
+   させるための文字の組み合わせとの対応表 (辞書依存ファイル)を読み込ま
+   せています.  上の例では,
+
+    od-chujiten       EBXA 版 研究社新英和・和英中辞典5・3版
+    od-kojien         EBXA 版 岩波書店広辞苑
+    od-readers        EBXA 版 研究社リーダーズ英和辞典
+    od-crown          EBXA 版 三省堂クラウン仏和・独和辞典
+
+   という, 私三田が持っている 8cm CDROM 辞書の辞書依存ファイルを読み込ま
+   せています.
+
+   diclookup-mule-2.3.3 には他にも, 次のような辞書依存ファイルが揃って
+   いますので, 適宜追加削除します.
+
+    od-chujiten64     EBXA 版 研究社新英和・和英中辞典6・4版
+    od-chujiten64-epw EPWING 版 研究社新英和・和英中辞典6・4版
+    od-oxford         Oxford コンサイス英英辞典, シソーラス
+    od-italian        日外アソシエーツ 現代イタリア語表現辞典
+
+   特に, EPWING 版 研究社新英和・和英中辞典6・4版 は, パシフィック
+   ハイテックhttp://www.pht.co.jp/ さんから出ている, 
+   FreeBSD Pro 2.2.6J にバンドルされているなど, 
+   標準的に売られている辞書なので, この辞書をお持ちの方が増えてくると
+   思いますので注意が必要です.
+   (蛇足ながら, xanim をインストールして, EPWING 版の新英和中辞典を
+    使えば, 音声データを聞くことができます. これで発音もばっちり.)
+
+III. 削除(uninstall)
+
+    削除は，インストールの逆を行えばよいわけですが，自動的に削除を
+  行うためのシェルスクリプト，[${PREFIX}/lib/dserver/deinstall.sh] を
+  用意しておきました．
+
+    その後で，pkg_deleteを行えばOKのはずです．
+
+質問，不平不満など御座いましたらmita@jp.FreeBSD.orgにどうぞ．
diff --git a/japanese/diclookup-emacs20/files/deinstall-diclookup.sh b/japanese/diclookup-emacs20/files/deinstall-diclookup.sh
new file mode 100644
index 000000000000..add03bf16586
--- /dev/null
+++ b/japanese/diclookup-emacs20/files/deinstall-diclookup.sh
@@ -0,0 +1,14 @@
+#!/bin/sh
+/usr/bin/dialog --title "ja-diclookup-mule deinstallation script" --clear \
+	--yesno "\n\
+Removing diclookup-mule initialization code from site-start.el \n\
+Are you sure?" -1 -1
+RETVAL=$?
+
+if [ "X${RETVAL}" = "X0" ] ; then # answer is `Yes'. hack diclookup-mule.
+cp PREFIX_DIR/lib/mule/site-lisp/site-start.el PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak
+grep -v diclookup-mule PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak > PREFIX_DIR/lib/mule/site-lisp/site-start.el
+
+/usr/bin/dialog --title "Message" --clear \
+	--msgbox "Thank you for using diclookup-mule.  A bientot." -1 -1
+fi
diff --git a/japanese/diclookup-emacs20/files/patch-aa b/japanese/diclookup-emacs20/files/patch-aa
new file mode 100644
index 000000000000..8fe67e3198b0
--- /dev/null
+++ b/japanese/diclookup-emacs20/files/patch-aa
@@ -0,0 +1,11 @@
+--- diclookup-mule.el.orig	Sun Aug  2 15:52:36 1998
++++ diclookup-mule.el	Sun Aug  2 15:52:47 1998
+@@ -2562,7 +2562,7 @@
+ 	    (set-process-coding-system
+ 	     process od-no-conversion od-no-conversion)
+ 	    (message "transferring sound data...")
+-	    (setq rate (* rate 100))
++	    (setq rate (* rate 1000))
+ 	    (process-send-string
+ 	     process
+ 	     (concat "RIFF"
diff --git a/japanese/diclookup-emacs20/files/setup-diclookup.sh b/japanese/diclookup-emacs20/files/setup-diclookup.sh
new file mode 100644
index 000000000000..e0d033b901d6
--- /dev/null
+++ b/japanese/diclookup-emacs20/files/setup-diclookup.sh
@@ -0,0 +1,61 @@
+#!/bin/sh
+/usr/bin/dialog --title "ja-diclookup setup" --clear \
+	--yesno "\n\
+You have to install appropreate startup code for diclookup-mule. \n\
+This setup script automatically it to: \n\
+PREFIX_DIR/lib/mule/site-lisp/site-start.el. \n\n\
+Are you sure?" -1 -1
+RETVAL=$?
+# RETVAL=0 for yes, 1 for no, 255 for ESC.
+
+if [ "X${RETVAL}" = "X0" ] ; then # answer is `Yes'. hack diclookup-mule.
+
+# Hack PREFIX_DIR/lib/mule/site-lisp/site-start.el
+rm -f /tmp/hack-site-start.el
+echo "(defun hack-site-start ()" >> /tmp/hack-site-start.el
+echo "  (interactive)" >> /tmp/hack-site-start.el
+echo "  (message \"Updating site-start.el.  \")" >> /tmp/hack-site-start.el
+echo "  (let* ((args command-line-args-left)" >> /tmp/hack-site-start.el
+echo "	 (fname (expand-file-name (nth 0 args)))" >> /tmp/hack-site-start.el
+echo "	 (dir (nth 1 args)))" >> /tmp/hack-site-start.el
+echo "    (setq command-line-args-left (cdr (cdr command-line-args-left)))" >> /tmp/hack-site-start.el
+echo "    (set-buffer (get-buffer-create \" *x*\"))" >> /tmp/hack-site-start.el
+echo "    (erase-buffer)" >> /tmp/hack-site-start.el
+echo "    (if (file-exists-p fname)" >> /tmp/hack-site-start.el
+echo "	(insert-file-contents fname))" >> /tmp/hack-site-start.el
+echo "    (goto-char (point-min))" >> /tmp/hack-site-start.el
+echo "    (if (search-forward \";;; diclookup-mule: Online dictionary\" nil t)" >> /tmp/hack-site-start.el
+echo "	(message \"No changes made.\")" >> /tmp/hack-site-start.el
+echo "      (goto-char (point-max))" >> /tmp/hack-site-start.el
+echo "      (insert \"\n;;; diclookup-mule: Online dictionary\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(autoload 'online-dictionary \\\"diclookup-mule\\\" \")" >> /tmp/hack-site-start.el
+echo "      (insert \"\\\"Online dictionary.\\\" t nil)\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(autoload 'od:lookup-pattern-edit \\\"diclookup-mule\\\" \")" >> /tmp/hack-site-start.el
+echo "      (insert \"\\\"Look up a word.\\\" t nil)\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq od-chujiten-flag t)	; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq od-dictfile-list '(\\\"od-chujiten\\\" \\\"od-kojien\\\" \\\"od-readers\\\" \\\"od-crown\\\")) \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq dserver-server-list '(\\\"localhost\\\")) ; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq od-frame-geometry \\\"+0-0\\\" od-hide-frame \")" >> /tmp/hack-site-start.el
+echo "      (insert \"'make-invisible) ; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(add-hook 'od-really-quit-hook 'od-delete-frame) \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(define-key-after menu-bar-file-menu [dictionary] \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"	'(\\\"Online Dictionary\\\" . online-dictionary) 'calendar) \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (write-file fname))))" >> /tmp/hack-site-start.el
+
+mule -batch -q -l /tmp/hack-site-start.el -f hack-site-start \
+		PREFIX_DIR/lib/mule/site-lisp/site-start.el ;
+rm -f /tmp/hack-site-start.el
+
+/usr/bin/dialog --title "ja-diclookup setup" --clear \
+	--msgbox "\n\
+original file is saved in PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak" -1 -1
+
+else
+/usr/bin/dialog --title "ja-diclookup setup" --clear \
+	--msgbox "\n\
+For setup, documents under PREFIX_DIR/lib/dserver will be helpful." -1 -1
+fi
diff --git a/japanese/diclookup-emacs20/pkg-comment b/japanese/diclookup-emacs20/pkg-comment
new file mode 100644
index 000000000000..83867e080821
--- /dev/null
+++ b/japanese/diclookup-emacs20/pkg-comment
@@ -0,0 +1 @@
+CDROM dictionary client for mule
diff --git a/japanese/diclookup-emacs20/pkg-descr b/japanese/diclookup-emacs20/pkg-descr
new file mode 100644
index 000000000000..9a5f9be07609
--- /dev/null
+++ b/japanese/diclookup-emacs20/pkg-descr
@@ -0,0 +1,7 @@
+diclookup-mule is a CDROM dictionary client for mule.
+
+This package requires mule and ndtp server.
+Either dserver (japanese/dserver) or ndtpd (japanese/ndtpd) must be set up.
+
+WOW! This version supports `sound' of EPWING V2 format. Let's install xanim.
+	(Sound in the other format like EB,EBG,EBXA are not supported.)
diff --git a/japanese/diclookup-emacs20/pkg-message b/japanese/diclookup-emacs20/pkg-message
new file mode 100644
index 000000000000..58091fa62f91
--- /dev/null
+++ b/japanese/diclookup-emacs20/pkg-message
@@ -0,0 +1,8 @@
+To use these Emacs Lisp, startup code is needed.
+Consider to use ${PREFIX}/lib/dserver/setup-diclookup.sh
+(Also note deinstallation is deinstall-diclookup.sh)
+
+Also (or to begin with), Network Dictionary Transfer Protocol 
+server is mandatory.  You can use either:
+dserver:	ports/japanese/dserver, ja-dserver-2.2.2
+ndtpd:		Will be soon come to ports collection.
diff --git a/japanese/diclookup-emacs20/pkg-plist b/japanese/diclookup-emacs20/pkg-plist
new file mode 100644
index 000000000000..67a470c9a180
--- /dev/null
+++ b/japanese/diclookup-emacs20/pkg-plist
@@ -0,0 +1,19 @@
+lib/dserver/doc/README.diclookup-setup.txt
+lib/dserver/doc/README.diclookup-mule
+lib/dserver/doc/README.sirup
+lib/dserver/doc/README.diclookup-mule.lib
+lib/dserver/setup-diclookup.sh
+lib/dserver/deinstall-diclookup.sh
+lib/mule/site-lisp/od-eiwa.elc
+lib/mule/site-lisp/od-oxford.elc
+lib/mule/site-lisp/od-italian.elc
+lib/mule/site-lisp/od-crown.elc
+lib/mule/site-lisp/od-kojien.elc
+lib/mule/site-lisp/od-chujiten64-epw.elc
+lib/mule/site-lisp/od-chujiten64.elc
+lib/mule/site-lisp/od-chujiten.elc
+lib/mule/site-lisp/od-readers.elc
+lib/mule/site-lisp/diclookup-mule.elc
+lib/mule/site-lisp/sirup-doc.elc
+lib/mule/site-lisp/sirup.elc
+lib/mule/site-lisp/ndtp.elc
diff --git a/japanese/diclookup-mule/Makefile b/japanese/diclookup-mule/Makefile
new file mode 100644
index 000000000000..d28aa25182a1
--- /dev/null
+++ b/japanese/diclookup-mule/Makefile
@@ -0,0 +1,37 @@
+# New ports collection makefile for:	diclookup-mule
+# Version required:	2.3.1beta2
+# Date created:		31 Jan 1998
+# Whom:			Mita Yoshio <mita@jp.FreeBSD.org>
+#
+# $Id$
+#
+
+DISTNAME=	diclookup-mule-2.3.3
+PKGNAME=	ja-diclookup-mule-2.3.3
+CATEGORIES=	japanese
+MASTER_SITES=	ftp://ftp.math.s.chiba-u.ac.jp/tools/diclookup-mule/
+
+PATCH_SITES=	${MASTER_SITES}
+PATCHFILES=	diclookup-mule-2.3.3-wave-patch.gz
+
+MAINTAINER=	mita@jp.FreeBSD.org
+
+RUN_DEPENDS=	${X11BASE}/lib/X11/fonts/non-cjk/fonts.dir:${PORTSDIR}/x11/etlfonts
+BUILD_DEPENDS=	mule:${PORTSDIR}/japanese/mule-wnn4
+
+post-install:
+	${MKDIR} ${PREFIX}/lib/dserver/doc
+	@${SED} s!PREFIX_DIR!${PREFIX}!g ${FILESDIR}/setup-diclookup.sh \
+				> ${PREFIX}/lib/dserver/setup-diclookup.sh
+	@${SED} s!PREFIX_DIR!${PREFIX}!g ${FILESDIR}/deinstall-diclookup.sh \
+				> ${PREFIX}/lib/dserver/deinstall-diclookup.sh
+	${INSTALL_DATA} ${FILESDIR}/README.diclookup-setup.txt \
+				${PREFIX}/lib/dserver/doc
+	${INSTALL_DATA} ${WRKSRC}/README \
+				${PREFIX}/lib/dserver/doc/README.diclookup-mule
+	${INSTALL_DATA} ${WRKSRC}/README.sirup \
+				${PREFIX}/lib/dserver/doc/
+	${INSTALL_DATA} ${WRKSRC}/lib/README \
+			${PREFIX}/lib/dserver/doc/README.diclookup-mule.lib
+
+.include <bsd.port.mk>
diff --git a/japanese/diclookup-mule/distinfo b/japanese/diclookup-mule/distinfo
new file mode 100644
index 000000000000..7810bee15b1c
--- /dev/null
+++ b/japanese/diclookup-mule/distinfo
@@ -0,0 +1,2 @@
+MD5 (diclookup-mule-2.3.3.tar.gz) = 76f01fc26b7fc5fcf2064584bf672549
+MD5 (diclookup-mule-2.3.3-wave-patch.gz) = bad55b2e3aba2a69338a96c95bb70df5
diff --git a/japanese/diclookup-mule/files/README.diclookup-setup.txt b/japanese/diclookup-mule/files/README.diclookup-setup.txt
new file mode 100644
index 000000000000..f1c653b36723
--- /dev/null
+++ b/japanese/diclookup-mule/files/README.diclookup-setup.txt
@@ -0,0 +1,140 @@
+		Configuration of diclookup-mule FreeBSD port
+							    7.Jun.1998
+					   MITA Yoshio <mita@jp.FreeBSD.org>
+		  Special thanks to MIHIRA Yoshiro <sanpei@yy.cs.keio.ac.jp>
+
+`Diclookup-mule' is a frontend interface for NDTP (Network Dictionary
+Transfer Protocol) server on mule.
+One of mule (ja-*mule-2.3 or mule-2.3) is necessary for this program.
+
+1. NDTP server installation.
+
+    An NDTP server must therfore be installed.
+    Two programs are known as NDTP server: dserver and ndtpd.
+
+    dserver:  Dictionary server.  NDTP has been a protocol for dserver.
+	      It supports EB/EBG/EBXA/EPWING CDROM dictionaries.
+	      FreeBSD port is ready for installation: ja-dserver-2.2.2
+	      Dserver packages includes `dictionary file compression tool'
+
+    ndtpd:    Dserver-compatible Network Dictionary server.  
+	      It also supports EB/EBG/EBXA/EPWING CDROM dictionaries.
+    Also refer documents to each packages for setup of server.
+
+1. Add startup code to site-start.el
+    Typing
+	% /usr/local/lib/dserver/setup-diclookup.sh
+    displays you `ja-diclookup setup dialog':
+     ------------------------ja-diclookup setup --------------------------
+     |                                                                   |
+     | You have to install appropreate startup code for diclookup-mule.  |
+     | This setup script automatically it to:                            |
+     | /usr/local/lib/mule/site-lisp/site-start.el.                      |
+     |                                                                   |
+     | Are you sure?                                                     |
+     |-------------------------------------------------------------------|
+     |                       [ Yes ]         No                          |
+     |-------------------------------------------------------------------|
+	By answering [ Yes ], startup code is automatically added to
+	/usr/local/lib/mule/site-lisp/site-start.el
+	(Deinstallation is possible by deinstall-diclookup.sh)
+
+2. Usage.
+    Typing `M-x diclookup-mule' launches a new window for dictionary looking up.
+	f`word for looking up'[Enter] : Lookup a word
+	C`dictionary name'[Enter]     : Change dictionary (TAB complition OK)
+	o			      : Switch to other window
+	n,p,[ENTER]		      : Move cursor in window.
+	Q		              : Quit and delete window.
+	q			      : Suspend
+
+
+                 Dserver FreeBSD portセットアップについて．
+
+                                                             3.Nov.1996
+						Revised	    20.Dec.1996
+						Revised	    31.Jan.1998
+                                         三田吉郎 <mita@jp.FreeBSD.org>
+
+
+	目次
+	0. diclookup-mule 使用の前に.
+	I. 起動の準備.
+	   I.1. setup.sh の具体的な作業
+	II. 削除(uninstall)
+
+diclookup-mule は, mule の上で, 電子辞書を引けるようにするための
+プログラムです. これ単体で電子辞書が引けるのではなく, 辞書サーバと
+辞書 CDROM (とmule)とを正しくインストールして, はじめて使えるように
+なります.  とはいえ, 全く難しくありませんので, 御安心を.
+
+0. diclookup-mule 使用の前に.
+    NDTP (Network 辞書転送プロトコル)サーバをインストールして, 動作するように
+    しておくことが必須です.
+    NDTP サーバとしては, 老舗の dserver や, SRA の笠原さんが開発なさっている 
+    ndtpd などが知られています. 
+    dserver は, ja-dserver-2.2.2 というパッケージになっています.
+    ndtp も近日 FreeBSD ports colleciton に取り込まれることでしょう.
+    
+    dserver または, ndtp の設定は, それぞれのパッケージに附属の
+    文書を参照してください.
+    
+I. 起動の準備.
+
+    ~/.emacs もしくは ${PREFIX}/lib/mule/site-lisp/site-start.el などの,
+    初期設定ファイルに, diclookup-mule 起動のためのエントリを追加します.
+    [${PREFIX}/lib/dserver/setup-diclookup.sh] を起動すると, 自動的に
+   設定をsite-start.el に追加してくれます．
+
+  ※ ${PREFIX}
+     ここで ${PREFIX} とは ports をコンパイル時の環境変数 PREFIX を
+     示します. packages では, [/usr/local] となります.  上記の場合,
+     [/usr/local/lib/dserver/setup-diclookup.sh] と適時読みかえてください. 
+
+II. site-start.el の再編集.
+
+   setup-diclookup.sh を起動すれば, 自動的に設定を追加してくれるのですが,
+   一点だけ修正するところがあります.
+   ${PREFIX}/lib/mule/site-lisp/site-start.el の次の行です.
+
+--------
+(setq od-dictfile-list '("od-chujiten" "od-kojien" "od-readers" "od-crown")) ; diclookup-mule
+--------
+
+   この行では, 使用する辞書 CDROM の中に埋め込まれている外字と, mule で表示
+   させるための文字の組み合わせとの対応表 (辞書依存ファイル)を読み込ま
+   せています.  上の例では,
+
+    od-chujiten       EBXA 版 研究社新英和・和英中辞典5・3版
+    od-kojien         EBXA 版 岩波書店広辞苑
+    od-readers        EBXA 版 研究社リーダーズ英和辞典
+    od-crown          EBXA 版 三省堂クラウン仏和・独和辞典
+
+   という, 私三田が持っている 8cm CDROM 辞書の辞書依存ファイルを読み込ま
+   せています.
+
+   diclookup-mule-2.3.3 には他にも, 次のような辞書依存ファイルが揃って
+   いますので, 適宜追加削除します.
+
+    od-chujiten64     EBXA 版 研究社新英和・和英中辞典6・4版
+    od-chujiten64-epw EPWING 版 研究社新英和・和英中辞典6・4版
+    od-oxford         Oxford コンサイス英英辞典, シソーラス
+    od-italian        日外アソシエーツ 現代イタリア語表現辞典
+
+   特に, EPWING 版 研究社新英和・和英中辞典6・4版 は, パシフィック
+   ハイテックhttp://www.pht.co.jp/ さんから出ている, 
+   FreeBSD Pro 2.2.6J にバンドルされているなど, 
+   標準的に売られている辞書なので, この辞書をお持ちの方が増えてくると
+   思いますので注意が必要です.
+   (蛇足ながら, xanim をインストールして, EPWING 版の新英和中辞典を
+    使えば, 音声データを聞くことができます. これで発音もばっちり.)
+
+III. 削除(uninstall)
+
+    削除は，インストールの逆を行えばよいわけですが，自動的に削除を
+  行うためのシェルスクリプト，[${PREFIX}/lib/dserver/deinstall.sh] を
+  用意しておきました．
+
+    その後で，pkg_deleteを行えばOKのはずです．
+
+質問，不平不満など御座いましたらmita@jp.FreeBSD.orgにどうぞ．
diff --git a/japanese/diclookup-mule/files/deinstall-diclookup.sh b/japanese/diclookup-mule/files/deinstall-diclookup.sh
new file mode 100644
index 000000000000..add03bf16586
--- /dev/null
+++ b/japanese/diclookup-mule/files/deinstall-diclookup.sh
@@ -0,0 +1,14 @@
+#!/bin/sh
+/usr/bin/dialog --title "ja-diclookup-mule deinstallation script" --clear \
+	--yesno "\n\
+Removing diclookup-mule initialization code from site-start.el \n\
+Are you sure?" -1 -1
+RETVAL=$?
+
+if [ "X${RETVAL}" = "X0" ] ; then # answer is `Yes'. hack diclookup-mule.
+cp PREFIX_DIR/lib/mule/site-lisp/site-start.el PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak
+grep -v diclookup-mule PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak > PREFIX_DIR/lib/mule/site-lisp/site-start.el
+
+/usr/bin/dialog --title "Message" --clear \
+	--msgbox "Thank you for using diclookup-mule.  A bientot." -1 -1
+fi
diff --git a/japanese/diclookup-mule/files/patch-aa b/japanese/diclookup-mule/files/patch-aa
new file mode 100644
index 000000000000..8fe67e3198b0
--- /dev/null
+++ b/japanese/diclookup-mule/files/patch-aa
@@ -0,0 +1,11 @@
+--- diclookup-mule.el.orig	Sun Aug  2 15:52:36 1998
++++ diclookup-mule.el	Sun Aug  2 15:52:47 1998
+@@ -2562,7 +2562,7 @@
+ 	    (set-process-coding-system
+ 	     process od-no-conversion od-no-conversion)
+ 	    (message "transferring sound data...")
+-	    (setq rate (* rate 100))
++	    (setq rate (* rate 1000))
+ 	    (process-send-string
+ 	     process
+ 	     (concat "RIFF"
diff --git a/japanese/diclookup-mule/files/setup-diclookup.sh b/japanese/diclookup-mule/files/setup-diclookup.sh
new file mode 100644
index 000000000000..e0d033b901d6
--- /dev/null
+++ b/japanese/diclookup-mule/files/setup-diclookup.sh
@@ -0,0 +1,61 @@
+#!/bin/sh
+/usr/bin/dialog --title "ja-diclookup setup" --clear \
+	--yesno "\n\
+You have to install appropreate startup code for diclookup-mule. \n\
+This setup script automatically it to: \n\
+PREFIX_DIR/lib/mule/site-lisp/site-start.el. \n\n\
+Are you sure?" -1 -1
+RETVAL=$?
+# RETVAL=0 for yes, 1 for no, 255 for ESC.
+
+if [ "X${RETVAL}" = "X0" ] ; then # answer is `Yes'. hack diclookup-mule.
+
+# Hack PREFIX_DIR/lib/mule/site-lisp/site-start.el
+rm -f /tmp/hack-site-start.el
+echo "(defun hack-site-start ()" >> /tmp/hack-site-start.el
+echo "  (interactive)" >> /tmp/hack-site-start.el
+echo "  (message \"Updating site-start.el.  \")" >> /tmp/hack-site-start.el
+echo "  (let* ((args command-line-args-left)" >> /tmp/hack-site-start.el
+echo "	 (fname (expand-file-name (nth 0 args)))" >> /tmp/hack-site-start.el
+echo "	 (dir (nth 1 args)))" >> /tmp/hack-site-start.el
+echo "    (setq command-line-args-left (cdr (cdr command-line-args-left)))" >> /tmp/hack-site-start.el
+echo "    (set-buffer (get-buffer-create \" *x*\"))" >> /tmp/hack-site-start.el
+echo "    (erase-buffer)" >> /tmp/hack-site-start.el
+echo "    (if (file-exists-p fname)" >> /tmp/hack-site-start.el
+echo "	(insert-file-contents fname))" >> /tmp/hack-site-start.el
+echo "    (goto-char (point-min))" >> /tmp/hack-site-start.el
+echo "    (if (search-forward \";;; diclookup-mule: Online dictionary\" nil t)" >> /tmp/hack-site-start.el
+echo "	(message \"No changes made.\")" >> /tmp/hack-site-start.el
+echo "      (goto-char (point-max))" >> /tmp/hack-site-start.el
+echo "      (insert \"\n;;; diclookup-mule: Online dictionary\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(autoload 'online-dictionary \\\"diclookup-mule\\\" \")" >> /tmp/hack-site-start.el
+echo "      (insert \"\\\"Online dictionary.\\\" t nil)\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(autoload 'od:lookup-pattern-edit \\\"diclookup-mule\\\" \")" >> /tmp/hack-site-start.el
+echo "      (insert \"\\\"Look up a word.\\\" t nil)\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq od-chujiten-flag t)	; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq od-dictfile-list '(\\\"od-chujiten\\\" \\\"od-kojien\\\" \\\"od-readers\\\" \\\"od-crown\\\")) \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq dserver-server-list '(\\\"localhost\\\")) ; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(setq od-frame-geometry \\\"+0-0\\\" od-hide-frame \")" >> /tmp/hack-site-start.el
+echo "      (insert \"'make-invisible) ; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(add-hook 'od-really-quit-hook 'od-delete-frame) \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"(define-key-after menu-bar-file-menu [dictionary] \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (insert \"	'(\\\"Online Dictionary\\\" . online-dictionary) 'calendar) \")" >> /tmp/hack-site-start.el
+echo "      (insert \"; diclookup-mule\n\")" >> /tmp/hack-site-start.el
+echo "      (write-file fname))))" >> /tmp/hack-site-start.el
+
+mule -batch -q -l /tmp/hack-site-start.el -f hack-site-start \
+		PREFIX_DIR/lib/mule/site-lisp/site-start.el ;
+rm -f /tmp/hack-site-start.el
+
+/usr/bin/dialog --title "ja-diclookup setup" --clear \
+	--msgbox "\n\
+original file is saved in PREFIX_DIR/lib/mule/site-lisp/site-start.el.bak" -1 -1
+
+else
+/usr/bin/dialog --title "ja-diclookup setup" --clear \
+	--msgbox "\n\
+For setup, documents under PREFIX_DIR/lib/dserver will be helpful." -1 -1
+fi
diff --git a/japanese/diclookup-mule/pkg-comment b/japanese/diclookup-mule/pkg-comment
new file mode 100644
index 000000000000..83867e080821
--- /dev/null
+++ b/japanese/diclookup-mule/pkg-comment
@@ -0,0 +1 @@
+CDROM dictionary client for mule
diff --git a/japanese/diclookup-mule/pkg-descr b/japanese/diclookup-mule/pkg-descr
new file mode 100644
index 000000000000..9a5f9be07609
--- /dev/null
+++ b/japanese/diclookup-mule/pkg-descr
@@ -0,0 +1,7 @@
+diclookup-mule is a CDROM dictionary client for mule.
+
+This package requires mule and ndtp server.
+Either dserver (japanese/dserver) or ndtpd (japanese/ndtpd) must be set up.
+
+WOW! This version supports `sound' of EPWING V2 format. Let's install xanim.
+	(Sound in the other format like EB,EBG,EBXA are not supported.)
diff --git a/japanese/diclookup-mule/pkg-message b/japanese/diclookup-mule/pkg-message
new file mode 100644
index 000000000000..58091fa62f91
--- /dev/null
+++ b/japanese/diclookup-mule/pkg-message
@@ -0,0 +1,8 @@
+To use these Emacs Lisp, startup code is needed.
+Consider to use ${PREFIX}/lib/dserver/setup-diclookup.sh
+(Also note deinstallation is deinstall-diclookup.sh)
+
+Also (or to begin with), Network Dictionary Transfer Protocol 
+server is mandatory.  You can use either:
+dserver:	ports/japanese/dserver, ja-dserver-2.2.2
+ndtpd:		Will be soon come to ports collection.
diff --git a/japanese/diclookup-mule/pkg-plist b/japanese/diclookup-mule/pkg-plist
new file mode 100644
index 000000000000..67a470c9a180
--- /dev/null
+++ b/japanese/diclookup-mule/pkg-plist
@@ -0,0 +1,19 @@
+lib/dserver/doc/README.diclookup-setup.txt
+lib/dserver/doc/README.diclookup-mule
+lib/dserver/doc/README.sirup
+lib/dserver/doc/README.diclookup-mule.lib
+lib/dserver/setup-diclookup.sh
+lib/dserver/deinstall-diclookup.sh
+lib/mule/site-lisp/od-eiwa.elc
+lib/mule/site-lisp/od-oxford.elc
+lib/mule/site-lisp/od-italian.elc
+lib/mule/site-lisp/od-crown.elc
+lib/mule/site-lisp/od-kojien.elc
+lib/mule/site-lisp/od-chujiten64-epw.elc
+lib/mule/site-lisp/od-chujiten64.elc
+lib/mule/site-lisp/od-chujiten.elc
+lib/mule/site-lisp/od-readers.elc
+lib/mule/site-lisp/diclookup-mule.elc
+lib/mule/site-lisp/sirup-doc.elc
+lib/mule/site-lisp/sirup.elc
+lib/mule/site-lisp/ndtp.elc