[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:06691] Re: 関数の使い方



ARAI, Tsuyoshiさん、こんにちは。

	      From: "ARAI, Tsuyoshi" <t-arai@xxxxxxxxxxxxx>
	      Date: Fri, 20 Apr 2001 20:36:43 +0900
	   Subject: [xyzzy:06690] Re: 関数の使い方
	Message-ID: <20010420202114.A877.T-ARAI@xxxxxxxxxxxxx>

すいません。さっきのは間違い。

(defun my-resolve-shortcut (path)
  (let ((ext (pathname-type path)))
	(when (string-equal "lnk" ext)
	  (ed::find-file-internal (resolve-shortcut path)))))

拡張子が大文字の場合を考えてませんでした。


**********
quarto <quarto@xxxxxxxxxx>

Index Home