[MD:6897] mule-ucs

[小関 吉則 (KOSEKI Yoshinori) <kose@xxxxxxxxxxx>]

mule-ucs 関連でふたつ。

1.
http://www.meadowy.org/meadow/ticket/158

dot.emacs.ja に
;; ;;; Mule-UCS の設定
;; ;; ftp://ftp.m17n.org/pub/mule/Mule-UCS/
;; ;; (set-language-environment) の前に設定します
;; (require 'un-define)
;; (setq bitmap-alterable-charset 'tibetan-1-column)
;; (require 'jisx0213)

と書いてあります。この順番に意味があったはずなのですが思い出
せません。(検索したけどみっかんない)

coding-category-list が設定する順番によって違っちゃうからって
話じゃなかったんでしたっけ?


2.
netinstall で 白井さんに作ってもらったフォント設定で、
meadow -q の後に次の順で eval するとエラーになります。

(require 'un-define)
(require 'jisx0213)

(setq netinstall-pkg-dir (expand-file-name (concat data-directory 
					     "../packages")))

(load "c:/Meadow/packages/pkginfo/mule-fonts/auto-autoloads.el")

> Debugger entered--Lisp error: (error "Invalid value for :char-spec :nil")
>   signal(error ("Invalid value for :char-spec :nil"))
>   error("Invalid value for :char-spec :%S" nil)
>   mw32-convert-fr-spec-to-vec((:char-spec nil :height any :weight normal :slant normal))
>     : (略)
>   load-with-code-conversion("c:/Meadow/packages/pkginfo/mule-fonts/auto-autoloads.el" "c:/Meadow/packages/pkginfo/mule-fonts/auto-autoloads.el" nil nil)
>   load("c:/Meadow/packages/pkginfo/mule-fonts/auto-autoloads.el")
>   eval((load "c:/Meadow/packages/pkginfo/mule-fonts/auto-autoloads.el"))
>   eval-last-sexp-1(nil)
>   eval-last-sexp(nil)
>   call-interactively(eval-last-sexp)

font の設定後に mule-ucs を require してもエラーになりません。
なんで?
-- 
こせき // kose (a) Meadow y.org