summaryrefslogtreecommitdiff
path: root/Build/tools
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2007-06-22 08:48:35 +0000
committerNorbert Preining <preining@logic.at>2007-06-22 08:48:35 +0000
commit42871161d18b95e44b4ed1d8548f143de6e82c24 (patch)
tree11c0010ba4dcf6e4326412f0035468f6f1027fd6 /Build/tools
parent86772000ce73e63e072a7e2991aab7bf2214515a (diff)
move the comparison from ctan2tl (shell) to place (perl) and implement
the comparison by using tlpsrc->make_tlpobk($tltree) from the $tltree in cooked/$package. git-svn-id: svn://tug.org/texlive/trunk@4491 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/tools')
-rwxr-xr-xBuild/tools/ctan2tl.newinfra33
1 files changed, 0 insertions, 33 deletions
diff --git a/Build/tools/ctan2tl.newinfra b/Build/tools/ctan2tl.newinfra
index 00312137ddb..9b7c65a076b 100755
--- a/Build/tools/ctan2tl.newinfra
+++ b/Build/tools/ctan2tl.newinfra
@@ -111,39 +111,6 @@ printf "\n\f cooked\n"
find -depth -type d | xargs rmdir 2>/dev/null
find $pkg \! -type d -printf "%TY%Tm%Td.%TH%TM %p\n" | sort -r +1
-# compare to tpm.
-Master=../../../Master
-. $Master/tlpkg/lib/TeXLiveInfra.sh
-tpmfile=`ls $Master/texmf*/tpm/$pkg.tpm 2>/dev/null`
-if ! grep -q "^name $pkg" $Master/texlive.tlpdb ; then
- echo "$0: not present in $Master/texlive.tlpdb" >&2
-else
- printf "\n\f new vs. present $tpmfile\n"
- rm -f /tmp/pkgfiles.*
- # remove leading text in case of lines starting with texmf.
- # Then assume all actual files do start with texmf.
- tldb_tlp_get_srcfiles $Master/texlive.tlpdb $pkg > /tmp/pkgfiles.tpm.foo
- tldb_tlp_get_runfiles $Master/texlive.tlpdb $pkg >> /tmp/pkgfiles.tpm.foo
- tldb_tlp_get_docfiles $Master/texlive.tlpdb $pkg >> /tmp/pkgfiles.tpm.foo
- sort /tmp/pkgfiles.tpm.foo >/tmp/pkgfiles.tpm
- #
- # list of files in the new package we've just cooked.
- (cd $pkg && find \! -type d -print) | grep -v '/cooked/' \
- | sed -e 's,^\./,,' | sort >/tmp/pkgfiles.new
- #
- comm -3 /tmp/pkgfiles.new /tmp/pkgfiles.tpm
- #
- comm -12 /tmp/pkgfiles.new /tmp/pkgfiles.tpm >/tmp/tldiff.com
- #
- for common_file in `cat /tmp/tldiff.com`; do
- diff --ignore-all-space -u -U 0 $Master/$common_file $pkg/$common_file
- done >/tmp/tldiff
- diff_lines=`wc -l </tmp/tldiff`
- diff_lines=`expr $diff_lines / 2`
- printf "%d common files, ~%d lines different (/tmp/tldiff)\n" \
- `wc -l </tmp/tldiff.com` $diff_lines
-fi
-
printf "\n\f place.newinfra $place_chicken\n"
rm -rf $pkg.done
../place.newinfra $place_chicken $pkg