[skk 329] Re: overlayp

[岡田 健一 / Kenichi OKADA]

おかだです。

In the message "[skk 329] Re: overlayp"
               <200001271157.UAA16979 ＠ ring.etl.go.jp>
Mikio Nakajima <minakaji ＠ osaka.email.ne.jp> wrote:
 
> > poe-xemacs.elで
> > (defalias 'overlayp 'extentp)
> > とされているにもかかわらず，
> > 
> > (defun skk-detach-extent (object)
> >   (static-cond
> >    ((eq skk-emacs-type 'xemacs)
> >     (and (extentp object) (detach-extent object)))
> >    (t
> >     (and (overlayp object) (delete-overlay object)))))
> > 
> > とあるのは，何か意図があるのでしょうか？

>   extentp に alias が張られるのは overlay.el の require に失敗した場合
> だけですよね？ overlay.el が require できる場合は、overlay-* は、単な
> る extent 関数群への alias ではなく、もう少し複雑な仕事をしています。

> ぼくも詳しく説明できる程理解していませんが、XEmacs の extent と FSF
> Emacs の overlay とは異なる実装のようで、XEmacs の fsf-compat パッケー
> ジに含まれる overlay.el はこの実装の差異を埋めてできるだけ overlay に
> 近くなるような関数群が提供されています。

nemacsを置いておいて，XEmacsとFSF Emacsだけを考えた時には，
どのみち，SKKが必要な機能がエミュレートされるので，

(defun skk-detach-extent (object)
	(and (overlayp object) (delete-overlay object)))

だけでいいのでは？

overlaypが，
(defalias 'overlayp 'extentp) であろうと，

(defun overlayp (object)
  "Return t if OBJECT is an overlay."
  (and (extentp object)
       (extent-property object 'overlay)))
であろうと問題ないと思います．

In the message "[skk 339] Re: overlayp"
               <200001280553.OAA00871 ＠ ring.etl.go.jp>
Yuuichi Teranishi <teranisi ＠ gohome.org> wrote:

> > > ;; どうせなら，apelにoverlaypを入れてしまえば，
> > 
> >   上記のような訳ですので、APEL には是非 overlayp を入れましょう。

> ただ、poe-18.el では overlay がエミュレート対象になっているみたいで、

> いっそ、overlay を捨てて、
> 全部 null function にするのも手だとは思いますが、
> いかがでしょうか。

わたしも，poe-18.elで，overlay関連が一部しか定義されていないのが，
気になっていました．
全部 null function というのも悲しいので，
underline-region ぐらい使えると(WLの使用上とか)嬉しいかもしれないですね．

ただ，わたしの環境では，underline-regionがちゃんと動いてくれないのですが…

-- 
岡田 健一  URLs: mailto:okada ＠ opaopa.org
	   	 http://www.opaopa.org