Index of /pub/tweak/tweak-ja

      Name                    Last modified       Size  Description

[DIR] Parent Directory 14-Jul-2005 01:33 - [   ] Tweak-IMM050607.cs 09-Jun-2005 14:44 2k [   ] displayFontRefactori..> 09-Jun-2005 14:44 9k [DIR] install/ 09-Jun-2005 14:44 - [   ] ja.translation 09-Jun-2005 14:44 276k

Tweak Japanese Kit.
Based on Tweak #556

-----
"How to make me from the directory".

| stem makeZip |
stem _ Date today yyyymmdd.
makeZip _ [:name |
	| sarName src zip |
	sarName _ name, '-', stem, '.sar'.
	src _ FileDirectory default directoryNamed: name.
	zip _ ZipArchive new.
	zip addTree: src match: [:e | (e name first = $.) not].
	zip writeToFileNamed: sarName.
	zip close].
makeZip value: 'tweak-ja'.