[xyzzy:08947] Re: リストから取得した要素について

[Yoshitaka Nishiguti <pocari@xxxxxxxxxxxxxxx>]

こんばんは、つるりんさん。西口といいます。
On Sun, 9 Nov 2003 19:00:40 +0900 (JST)
Kataoka Yumi <tu93a@xxxxxxxxxxx> wrote:
> -------
> (setq b-name "abc.txt")
> "abc.txt"
> (string-equal (cdr (split-string b-name #\.)) "txt")
> 不正なデータ型です: ("txt"): string

こういうときは、段階をおって確かめるといいと思います。
(cdr (split-string b-name #\.))
を評価すると、
("txt")
と、cdr部が返ってきますが、これはリストです。
リストと文字列ををstring-equlaしたために出たエラーです。

この中の"txt"と比べたいのであれば
このリストのcar部を取り出すために

(car (cdr (split-string b-name #\.)))

とすれば
"txt"が返ってきます。

なので、
(string-equal (car (cdr (split-string b-name #\.))) "txt")
とすればtが返ってきます。

が、".txt"で終わる文字列を調べるのであれば

(string-match "\.txt$" b-name)

が簡単かと思います。