Article View: fj.editor.mule
Article #729Re: Q substitute 'unless' and 'when' easily ?
From: Katsumi Yamaoka
Date: Tue, 09 Mar 1999 00:00
Date: Tue, 09 Mar 1999 00:00
28 lines
2296 bytes
2296 bytes
>>>>> In <svDpQ.yoshimi@etl.go.jp>
>>>>> yoshimi@etl.go.jp (Takashi YOSHIMI) wrote:
ๅ่ฆใใ> ่ฉฆใใซ
ๅ่ฆใใ> (require 'cl)
ๅ่ฆใใ> ใๅฎ่กใใฆใใ load ใใใใใจใใใใunlessใwhenใฎใจใฉใผใฏ
ๅ่ฆใใ> ๅบใชใใชใฃใใฎใงใใใไปๅบฆใฏdefgroupใๅฎ็พฉใใใฆใใชใใใจใจ
ๅ่ฆใใ> ใฉใผใซใชใใพใใใ
Mule 2.3 base on Emacs 19.34 ใ ใฃใใๆฐใใ custom package ใไฝฟใฃใฆๆ
ๆธใงใใใฎใงใใใ19.28 ใงใฏใใใงใใใใใใชใใงใใญใ
(eval-when-compile
(require 'cl)
(unless (and (fboundp 'defgroup)
(fboundp 'defcustom))
(defmacro defgroup (&rest args))
(defmacro defcustom (symbol value &optional doc &rest args)
(let ((doc (concat "*" (or doc ""))))
(` (defvar (, symbol) (, value) (, doc)))))
))
ๅ่ฆใใ> ใใฏใใใ็ใใฏใชใใฃใใงใใญใ
ใฏใใไธ่จใฎ defgroup, defcustom ใฎใงใฃใกไธใใ่กใชใฃใฆใใใพใ ใพใ ๆท
ๅฑ
ใฏ้ซใใจๆใใพใใ(^^;;)
--
Katsumi Yamaoka <yamaoka@ga.sony.co.jp>
Technical Details
Message-ID:
<28ogm32c1u.fsf@kchisa.ga.sony.co.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<svBTh.yoshimi@etl.go.jp> <28r9qz6rsj.fsf@kchisa.ga.sony.co.jp> <svDpQ.yoshimi@etl.go.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 10eba4,135d496b62a50382 X-Google-Attributes: gid10eba4,public From: Katsumi Yamaoka <yamaoka@ga.sony.co.jp> Subject: Re: Q substitute 'unless' and 'when' easily ? Date: 1999/03/09 Message-ID: <28ogm32c1u.fsf@kchisa.ga.sony.co.jp> X-Deja-AN: 452967528 References: <svBTh.yoshimi@etl.go.jp> <28r9qz6rsj.fsf@kchisa.ga.sony.co.jp> <svDpQ.yoshimi@etl.go.jp> Content-Type: text/plain; charset=ISO-2022-JP X-News-System: INN 1.7.2/innfeed 0.10.1 X-Face: #kKnN,xUnmKia.'[pp`;Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu;B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&( Organization: Personal A&V Products Company, Sony Corporation, Tokyo, Japan. Mime-Version: 1.0 (generated by WEMI 1.13.3 - "Yaizu") User-Agent: T-gnus/6.10.062 (based on Pterodactyl Gnus v0.80) WEMI/1.13.3 (Yaizu) FLIM/1.12.6 (Family-Kลenmae) MULE XEmacs/21.2 (beta12) (Clio) (sparc-sun-solaris2.6) Cancel-Lock: sha1:YjC5N+qfqPl6cyYejh3aTvaSsFs= X-PGP-Sig: 5.0i Subject,Message-ID,Date,From,User-Agent,X-Face iQA/AwUBNuT3fuUtm6WIDG/UEQKsogCaA8ly42gotq+WJ0YHyih4tR+g7VQAni2v +B+ODuyWEOPCUZ9cPjyICCaR =52YP Newsgroups: fj.editor.mule