[Message Prev][Message Next][Thread Prev][Thread Next][Message Index][Thread Index]
Re: [MD:6398] re-sync up with Emacs 21.4 and cleanups.
- X-ml-count: 6455
- Subject: Re: [MD:6398] re-sync up with Emacs 21.4 and cleanups.
- From: "M.Fujii" <boochang@xxxxxxxxxxxx>
- Date: Mon, 28 Mar 2005 07:46:49 +0900 (JST)
- X-mailer: Mew version 4.1 on Emacs 21.4 / Mule 5.0 (SAKAKI)
藤井です。
From: Shuichi KITAGUCHI <kit@xxxxxxxxxxx>
Subject: Re: [MD:6398] re-sync up with Emacs 21.4 and cleanups.
Date: Mon, 28 Mar 2005 00:38:22 +0900 (JST)
> > ../site-lisp を参照する設定が廃止された場合、site-lisp 等の共有を自力
> > で対処しようとすると、その手段が、レジストリを手で書き換えるという作業
> > になります。
> > レジストリを手で書き換えるというのは対処方法としてはどうかと思います。
> >
> > ですので、../site-lisp を参照する設定を廃止する代わりに、バージョン間
> > 共有のためのパスを設定する手段を提供するのが良いのではないかと思います。
> >
> > # たとえば、install.exe にオプションを追加するとか。
>
> 単に、~/.emacsに
>
> (if (file-exists-p (expand-file-name "../../site-lisp" exec-directory))
> (setq load-path
> (cons (expand-file-name "../../site-lisp" exec-directory) load-path)))
>
> というようなものを書けばいいのかなと思っていたのですが、これではまずい
> でしょうか?
サブディレクトリも load-path に加えるようにしないといけないと思います。
こんな感じでしょうか? (動作確認してません)
(let ((site-lisp-common (expand-file-name "../../site-lisp" exec-directory)))
(when (file-exists-p site-lisp-common)
(setq load-path (cons site-lisp-common load-path))
(let ((default-directory site-lisp-common))
(load (expand-file-name "subdirs.el" site-lisp-common) t t t))))
~/.emacs で設定したのでは遅すぎるというケースはあるでしょうか?
# そのようなケースがなければ私としては上記のような設定を追加すれば十分です。
--
藤井 正行 / Masayuki FUJII ( boochang@xxxxxxxxxxxx )