Update of /cvsroot/fink/experimental/todai/user-ja/sedsrc
In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv10483/sedsrc
Modified Files:
user-ja.el.in
Log Message:
* 4.2 release
* sedsrc/user-ja.el.in: Use anthy-el if available.
Index: user-ja.el.in
===================================================================
RCS file: /cvsroot/fink/experimental/todai/user-ja/sedsrc/user-ja.el.in,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- user-ja.el.in 17 Feb 2008 04:23:31 -0000 1.7
+++ user-ja.el.in 17 May 2008 19:46:34 -0000 1.8
@@ -45,9 +45,12 @@
(add-hook 'minibuffer-setup-hook 'mac-change-language-to-us)
(when (fboundp 'mac-translate-from-yen-to-backslash)
(mac-translate-from-yen-to-backslash)))
- ((eq current-language-environment "Japanese")
- (if (fboundp 'force-yc-input-mode) ;; assuming site-start.d/50yc.el
- (force-yc-input-mode)))))
+ ((equal current-language-environment "Japanese")
+ (cond
+ ((assoc "japanese-anthy" input-method-alist)
+ (setq default-input-method "japanese-anthy"))
+ ((assoc "japanese-yc" input-method-alist)
+ (setq default-input-mehtod "japanese-yc"))))))
;; For Todai Fink Team's obsolete emacs21-carbon package.
;; As we moved utf-8m.el into emacs22-carbon, utf-8m is not available
;; on emacs21-carbon now.
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
http://news.gmane.org/gmane.os.apple.fink.cvs
