[xyzzy:06691] Re: 関数の使い方
- Subject: [xyzzy:06691] Re: 関数の使い方
- From: quarto <quarto@xxxxxxxxxxxx>
- X-mailer: KaMail-0.0.2.4[01/03/14] on xyzzy-0.2.1.192 (windows-2000)
- X-yzzy-version: 0.2.1.192
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>