context-handlecsv (22mar18)

git-svn-id: svn://tug.org/texlive/trunk@47080 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 14 insertions, 1 deletions

diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index 02e279cb5dd..dabf4ed3a35 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -3382,6 +3382,11 @@ sub MAKEcopy {
   &killfiles ($specialclean{$package} || $standardclean);
   &killfiles ($moreclean{$package}, "more") if $moreclean{$package};
   
+  # horrible special case to avoid listing every context-* package again.
+  if ($package =~ /^context-/ && ! $posthook{$package}) {
+    $posthook{$package} = "POST_context_contrib";
+  }
+ 
   &do_posthook ();
 }
 
@@ -5763,6 +5768,14 @@ sub build_scripts_copy {
   }
 }
 
+sub POST_context_contrib {
+  print "POST_context_contrib for $package - move VERSION file\n";
+  print `pwd`;
+  print `ls -R`;
+  (my $context_package = $package) =~ s/^context-//;
+  &SYSTEM ("$MV VERSION $DEST/doc/context/third/$context_package/");
+}
+
 sub POSTcontext_games {
   print "POST$package - remove duplicated fonts\n";
   &SYSTEM ("$RM -rf fonts");
@@ -5770,7 +5783,7 @@ sub POSTcontext_games {
 
 sub POSTcoordsys {
   print "POST$package - rename `putfile.' to `putfile.maple'\n";
-  # Apparently dtx insists on always adding the period; this can make
+  # Apparently dtx (TeX) insists on always adding the period; this can make
   # vfat filesystems choke.
   &SYSTEM ("$MV putfile. putfile.maple");
 }