🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.tcl
Article #140

[Q]Tk version check on wish script

#140
From: Naofumi INODA
Date: Mon, 20 Oct 1997 00:00
32 lines
1998 bytes

$BN)L?4[Bg3X$N0KLnED$H?=$7$^$9(B. 

$B!t$3$3$K$O=i$a$FEj9F$5$;$FD:$-$^$9(B. 

$B8=:_8&5f<<$N(B UNIX $B$K$F(B Tk $B$r;HMQ$9$k$3$H$,$"$k$N$G$9$,(B, $B%[%9%H$K$h$C$F%$%s(B
$B%9%H!<%k$5$l$F$$$k(B Tk $B$N%P!<%8%g%s$,0c$&$N$G$9(B. $BA4$F$N%[%9%H$K:G?7$N$r%$%s(B
$B%9%H!<%k$9$l$PLdBj$J$$$N$G$9$,(B, $B=PMh$l$P:n@.$9$k%9%/%j%W%H%l%Y%k$GJ,4t$5$;(B
$B$?J}$,(B, $BMM!9$J%P!<%8%g%s$KBP1~$G$-$k$H;W$$$^$9(B. $BFC$K(B 3.6jp $B$+$i(B 4.0jp $B$K%"%C(B
$B%W$9$k$H$-$K$+$J$j$N;EMM$NJQ99$,$"$C$?$h$&$J$N$G(B, $B$3$l$r5[<}$7$?$$$N$G$9(B. 

$BNc$($P(B ``tk colormodel .'' $B$O(B 3.6jp $B$KB8:_$7$^$9$,(B 4.0jp $B$K$OB8:_$7$^$;$s(B. 
$B6qBNE*$K$O(B
	if {$tk_version=="3.6jp"} {
	#	3.6jp $B$G$N=hM}(B
	} else {
	#	4.0jp $B$G$N=hM}(B
	}
$B$N$h$&$K$7$?$$$N$G$9(B. 

$B2?$+$$$$J}K!$,$"$j$^$7$?$i(B, $B$b$7$/$OJL$Ne:No$JJ}K!$J$I$,$"$j$^$7$?$i(B, $B$h$m(B
$B$7$/$*4j$$$7$^$9(B. 

$B0l1~4X78$J$$$H;W$&$N$G$9$,(B, $B4D6-$O(B SunOS4.1.4, FreeBSD2.2.1R $B$,%a%$%s$G$9(B. 

$B$G$O(B. 

-----

Naofumi INODA <inochan@airlab.cs.ritsumei.ac.jp>
Ritsumeikan Univ., Shiga/Kyoto, Japan.
Technical Details
Message-ID: <19971020200054K.inochan@airlab.cs.ritsumei.ac.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 15a83d,a6ec8e48b7f14bc0,start
X-Google-Attributes: gid15a83d,public
From: Naofumi INODA <inochan@airlab.cs.ritsumei.ac.jp>
Subject: [Q]Tk version check on wish script
Date: 1997/10/20
Message-ID: <19971020200054K.inochan@airlab.cs.ritsumei.ac.jp>
X-Deja-AN: 282009868
X-Face-Version: X-Face utility v1.2.9(beta1) - "Ob-la-di,Ob-la-da" with Select-XFace v0.05 - "Band On The Run"
X-Dispatcher: imput version 970929
X-fingerprint: 6B 79 67 E8 1B D2 C4 DC  44 2C 34 DF AE 4A 4C 00
X-Face: "-$B5tVi)-u))^?c3e|'%'@\J6Q"xBlY54k/tb6xfU8="1%UD&:2!nKjt4ft3GT)]QT"D<_ KNq!zm!}}E6$Tm"1<_"`3s)'/ny^+<NrAk>Iu~Yc$^qJH*oQC{[`N
Organization: Ritsumeikan University, Kyoto/Shiga, JAPAN
X-URL: http://www.airlab.cs.ritsumei.ac.jp/~inochan/index-j.html
X-Attribution: Inochan
Newsgroups: fj.lang.tcl