diff options
author | Norbert Preining <preining@logic.at> | 2007-06-22 08:48:35 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2007-06-22 08:48:35 +0000 |
commit | 42871161d18b95e44b4ed1d8548f143de6e82c24 (patch) | |
tree | 11c0010ba4dcf6e4326412f0035468f6f1027fd6 /Build/tools | |
parent | 86772000ce73e63e072a7e2991aab7bf2214515a (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-x | Build/tools/ctan2tl.newinfra | 33 |
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 |