diff options
author | Karl Berry <karl@freefriends.org> | 2008-06-16 01:04:55 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-06-16 01:04:55 +0000 |
commit | 9c9b247169db4fbed4d1b19bee9a54f0f3f72c6a (patch) | |
tree | 9d4337d6cb6a83940b9cb8e354b08300fd8f4e06 /Master | |
parent | 901ec8ecdd90826fcfae493cb96d1629c654fec4 (diff) |
attempt at cjk
git-svn-id: svn://tug.org/texlive/trunk@8769 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/tlpkg/bin/ctan2tds | 69 |
1 files changed, 47 insertions, 22 deletions
diff --git a/Master/tlpkg/bin/ctan2tds b/Master/tlpkg/bin/ctan2tds index e9de5ff0045..66b576fe40b 100755 --- a/Master/tlpkg/bin/ctan2tds +++ b/Master/tlpkg/bin/ctan2tds @@ -103,7 +103,7 @@ chdir $startdir || die "chdir($startdir) failed: $!"; # back to raw 'cheq', "die 'skipping, nosell license'", 'circuit_macros', "die 'skipping, needs m4'", 'cjhebrew', "&MAKEflatten", - 'cjk', "&MAKEflatten", + 'cjk', "die 'skipping, not ready'", #"&MAKEcjk", 'clock', "&MAKEflatten", 'cm-lgc', '&MAKEcmlgc', 'cmbright', "&MAKEflatten", @@ -1251,7 +1251,7 @@ exit 2 unless Getopt::Long::GetOptions ( ); for (@ARGV) { - $packagedir=$_; + $packagedir = $_; if (! -d $packagedir) { warn "$0: $packagedir not a directory, skipping.\n"; next; @@ -1289,6 +1289,7 @@ for (@ARGV) { &xchdir ($startdir); } + # Override our default guess of "latex" if we can intuit from the CTAN # path, which ctan2tl kindly passes us. @@ -1331,6 +1332,12 @@ sub xchdir print "\t CHDIR $dir (now $pwd)\n"; } +sub xmkdir +{ + my ($dir) = @_; + &SYSTEM ("mkdir -p $dir"); +} + # some packages (e.g., vntex) are tl-ready (or near enough). @@ -1403,28 +1410,31 @@ sub MAKEcopy # -# For most packages, this is the first thing called. +# For most packages, this is the first thing called. It copies +# everything from $packagedir to the doc directory of the package. # -sub setup { +sub setup +{ my ($ctl) = @_; print "doing setup($ctl)...\n"; # precreate the directories we might need $DOCDIR = "$DEST/doc/$whichdocformat/$package"; - &SYSTEM("mkdir -p $DOCDIR"); - &SYSTEM("mkdir -p $DEST/tex/$whichformat/$package"); - &SYSTEM("mkdir -p $DEST/source/$whichdocformat/$package"); + &SYSTEM ("mkdir -p $DOCDIR"); + &SYSTEM ("mkdir -p $DEST/tex/$whichformat/$package"); + &SYSTEM ("mkdir -p $DEST/source/$whichdocformat/$package"); # remove README symlinks. &SYSTEM ("test -h $packagedir/README && $RM $packagedir/README"); return if $ctl eq "nocopytodoc"; # copy everything to the doc directory - # and work in there - &SYSTEM("$CP -r $packagedir/* $DEST/doc/$whichdocformat/$package"); + # and work in there. + &SYSTEM ("$CP -r $packagedir/* $DEST/doc/$whichdocformat/$package"); } -sub donormal { +sub donormal +{ my ($ctrl) = @_; print "doing donormal($ctrl)...\n"; @@ -2290,7 +2300,7 @@ sub MAKEfootnpag { sub MAKEeplain { print "\t SPECIAL $package\n"; &setup; - chdir ($DEST) || die "chdir($DEST) failed: $!"; + &xchdir ($DEST); rename ("tex/eplain/eplain", "tex/eplain/base"); &SYSTEM ("$MV $DOCDIR/eplain.tex tex/eplain/base"); &SYSTEM ("$MV $DOCDIR/btxmac.tex tex/eplain/base"); @@ -3056,7 +3066,26 @@ sub MAKEpsnfss { &SYSTEM ("rm -rf enc tfm vf"); } -sub MAKEcmlgc { +sub MAKEcjk +{ + print "\t SPECIAL $package wholesale rearranging\n"; + # + &setup (); + # + # start by removing the version number top-level directory. + &xchdir ($DOCDIR); + &SYSTEM ("$RM *.zip && $MV 4.8.0/* . && rmdir 4.8.0"); + # + &xchdir ($DEST); + # rename texinput to tex/latex/cjk. + &SYSTEM ("rmdir tex/latex/cjk; $MV $DOCDIR/texinput tex/latex/cjk"); + # + # miscellany for source subdir. + &SYSTEM ("$MV $DOCDIR/contrib $DOCDIR/utils source/latex/cjk/"); +} + +sub MAKEcmlgc +{ &setup; chdir("$DEST/doc/$whichdocformat/$package"); &SYSTEM("rm -rf vtex"); @@ -3089,7 +3118,8 @@ sub MAKEpict2e } -sub MAKEpictex { +sub MAKEpictex +{ &setup; chdir ($DOCDIR) || die "chdir($DOCDIR) failed: $!"; &SYSTEM("rm -rf mathspic"); # separate package @@ -3097,6 +3127,7 @@ sub MAKEpictex { &donormal; } + sub POSTfpl { @@ -3165,24 +3196,18 @@ sub POSTpgf &SYSTEM ("cd $DEST && mkdir tex && mv context generic latex plain tex"); } -sub xmkdir -{ - my ($dir) = @_; - &SYSTEM ("mkdir -p $dir"); -} - sub POSTpgfplots { print "\t POST$package - mv directories\n"; &xchdir ($DEST); # &xmkdir ("doc/generic/$package"); - &SYSTEM ("mv README ext_scripts test doc/generic/$package"); + &SYSTEM ("$MV README ext_scripts test doc/generic/$package"); # &xmkdir ("tex/generic"); - &SYSTEM ("mv generic tex/generic/$package"); + &SYSTEM ("$MV generic tex/generic/$package"); # - &SYSTEM ("mv context latex plain tex"); + &SYSTEM ("$MV context latex plain tex"); } sub POSTpstcox |