diff options
author | Karl Berry <karl@freefriends.org> | 2006-05-03 22:29:05 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-05-03 22:29:05 +0000 |
commit | ec949a72dc92282187534262a2eaea9f80e021b3 (patch) | |
tree | c972ff1f09e1aa8dc83e15ce73085b938bc5e015 | |
parent | 1dc1536d63d9f4ede7fc5d3fff08eea3954abe15 (diff) |
place -n chicken option
git-svn-id: svn://tug.org/texlive/trunk@1567 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Build/cdbuild/place | 19 | ||||
-rwxr-xr-x | Build/tools/ctan2tl | 10 |
2 files changed, 18 insertions, 11 deletions
diff --git a/Build/cdbuild/place b/Build/cdbuild/place index ce088b0e451..292237db352 100755 --- a/Build/cdbuild/place +++ b/Build/cdbuild/place @@ -16,6 +16,17 @@ use Cwd; $newpackage=0; @zapped=(); +if ($ARGV[0] eq "-n") { + $chicken = 1; + shift; +} else { + $chicken = 0; +} +print "place: chicken mode = $chicken\n"; + +if (@ARGV != 1) { + die "usage: $0 PKGNAME\n"; +} $package=$ARGV[0]; xchdir (dirname($0) . "/cooked"); @@ -41,10 +52,9 @@ if (-f "$M/texmf/lists/$package") { } close(LIST); } -else - { - $newpackage=1; - } +else { + $newpackage=1; +} if (! -f "$M/$Root/tpm/$package.tpm") { &my_system ("svn add $M/$Root/tpm/$package.tpm"); @@ -144,7 +154,6 @@ sub my_system print "place: SYSTEM $cmd\n"; - my $chicken = 1; unless ($chicken) { my $ret = system ($cmd); print "... failed, status=$ret\n" if $ret != 0; diff --git a/Build/tools/ctan2tl b/Build/tools/ctan2tl index b5032e76f33..4af6a963c77 100755 --- a/Build/tools/ctan2tl +++ b/Build/tools/ctan2tl @@ -17,10 +17,10 @@ test -d $raw || mkdir $raw cd $raw || exit 1 if test "x$1" = x--place; then - place=true + place_chicken= shift else - place=false + place_chicken=-n fi if test "x$1" = x--no-ctan; then @@ -121,10 +121,8 @@ else comm -3 /tmp/pkgfiles.tpm /tmp/pkgfiles.tl fi -$place || exit 0 - -printf "\n\f place\n" +printf "\n\f place $place_chicken\n" rm -rf $pkg.done -../place $pkg +../place $place_chicken $pkg rm -rf ../raw/$pkg |