diff lisp/mule/canna-leim.el @ 3824:50d74a9d19b7

[xemacs-hg @ 2007-02-11 18:55:40 by scop] Look for canna_api instead of canna/canna_api <200701212201.28062.scop@xemacs.org>, <877iuwhqpz.fsf@uwakimon.sk.tsukuba.ac.jp>
author scop
date Sun, 11 Feb 2007 18:55:43 +0000
parents bd7174adf0f2
children 9e51b172d50f 91b3aa59f49b
line wrap: on
line diff
--- a/lisp/mule/canna-leim.el	Sat Feb 10 22:51:20 2007 +0000
+++ b/lisp/mule/canna-leim.el	Sun Feb 11 18:55:43 2007 +0000
@@ -35,17 +35,17 @@
 (globally-declare-boundp 'canna:*japanese-mode*)
 (globally-declare-fboundp '(canna canna-toggle-japanese-mode))
 
-;; use (locate-file "canna/canna_api" module-load-path module-extensions)
+;; use (locate-file "canna_api" module-load-path module-extensions)
 ;; to locate the module without loading it.
 ;; then we could autoload canna-activate and dump and/or autoload:
-;; (and (locate-file "canna/canna_api" module-load-path module-extensions)
+;; (and (locate-file "canna_api" module-load-path module-extensions)
 ;;      (locate-library "canna")
 ;;      (register-input-method 'japanese-canna "Japanese" 'canna-activate nil
 ;;       "Canna - a kana to kanji conversion program"))
 
 (defun canna-activate (&optional name)
   ;; XEmacs 21.5.10 and later have 3-argument require.
-  (unless (require 'CANNA "canna/canna_api" 'no-error)
+  (unless (require 'CANNA "canna_api" 'no-error)
     (error 'file-error
 	   "No Canna API support!? See M-x describe-installation & C-h v module-load-path."))
   (unless (require 'canna nil 'no-error)