Mercurial > hg > xemacs-beta

diff lisp/mule/canna.el @ 163:0132846995bd r20-3b8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b8
author cvs
date Mon, 13 Aug 2007 09:43:35 +0200
parents 6608ceec7cf8
children e45d5e7c476e
line wrap: on
line diff
--- a/lisp/mule/canna.el	Mon Aug 13 09:42:28 2007 +0200
+++ b/lisp/mule/canna.el	Mon Aug 13 09:43:35 2007 +0200
@@ -5,7 +5,7 @@
 
 ;; Author: Akira Kon <kon@d1.bs2.mt.nec.co.jp>
 ;;         MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Revision: 1.6 $
+;; Version: $Revision: 1.7 $
 ;; Keywords: Canna, Japanese, input method, mule, multilingual
 
 ;; This file is not a part of Emacs yet.
@@ -40,6 +40,7 @@
 
 ;; by $B<i2,(B $BCNI'(B <morioka@jaist.ac.jp> 1996/11/11
 (or (boundp 'CANNA)
+    (not (fboundp 'dynamic-link))
     (let ((handle (dynamic-link (expand-file-name "canna.so" exec-directory))))
       (dynamic-call "emacs_canna_init" handle))
     )
@@ -49,7 +50,7 @@
 ;; end
 
 (defconst canna-rcs-version
-  "$Id: canna.el,v 1.6 1997/04/27 19:30:30 steve Exp $")
+  "$Id: canna.el,v 1.7 1997/06/21 20:02:46 steve Exp $")
 
 (defun canna-version ()
   "Display version of canna.el in mini-buffer."