FreeBSDを語ろう Part 10
■ このスレッドは過去ログ倉庫に格納されています
0565名無しさん@お腹いっぱい。
2006/02/16(木) 14:08:37どこに投げりゃいいのかさっぱりわからんので。
--- i18n-man-ja.el~Wed Jan 25 18:05:40 2006
+++ i18n-man-ja.elThu Feb 16 13:43:26 2006
@@ -63,8 +63,8 @@
Also save original values of variable to the local variable temporary."
(setenv "LC_CTYPE" "ja_JP.eucJP")
(if (featurep 'mule)
- (case emacs-major-version
-(20 ;; XEmacs or Emacs-20.x (Mule-2.4, 3.0 or later)
+ (cond
+ ((> emacs-major-version 19) ;; XEmacs or Emacs-20.x (Mule-2.4, 3.0 or later)
(setq i18n-Man-ja-depend-process-coding-system-alist process-coding-system-alist)
(setq i18n-Man-ja-depend-file-name-coding-system file-name-coding-system)
(if (and (boundp 'mule-version)
@@ -78,7 +78,7 @@
(setq process-coding-system-alist '(("sh" euc-japan . euc-japan)))
(setq file-name-coding-system 'euc-japan))
))
-(19 ;; Emacs-19.x (Mule-2.3)
+((= emacs-major-version 19) ;; Emacs-19.x (Mule-2.3)
(setq i18n-Man-ja-depend-default-process-coding-system default-process-coding-system)
(setq default-process-coding-system (cons '*euc-japan* '*euc-japan*))
))))
■ このスレッドは過去ログ倉庫に格納されています