texlive[67115] Master: context-handlecsv

[commits+karl at tug.org]

Revision: 67115
          http://tug.org/svn/texlive?view=revision&revision=67115
Author:   karl
Date:     2023-05-15 00:19:41 +0200 (Mon, 15 May 2023)
Log Message:
-----------
context-handlecsv

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/context/third/handlecsv/VERSION
    trunk/Master/tlpkg/libexec/ctan2tds

Modified: trunk/Master/texmf-dist/doc/context/third/handlecsv/VERSION
===================================================================
--- trunk/Master/texmf-dist/doc/context/third/handlecsv/VERSION	2023-05-14 22:08:04 UTC (rev 67114)
+++ trunk/Master/texmf-dist/doc/context/third/handlecsv/VERSION	2023-05-14 22:19:41 UTC (rev 67115)
@@ -1 +1 @@
-2019.05.27
+2023-05-08

Modified: trunk/Master/tlpkg/libexec/ctan2tds
===================================================================
--- trunk/Master/tlpkg/libexec/ctan2tds	2023-05-14 22:08:04 UTC (rev 67114)
+++ trunk/Master/tlpkg/libexec/ctan2tds	2023-05-14 22:19:41 UTC (rev 67115)
@@ -1588,6 +1588,7 @@
  'cm-super'             => '&PREHOOK_cm_super',
  'cmextra'              => '&PREHOOK_cmextra',
  'concrete'             => '&PREHOOK_concrete',
+ 'context-handlecsv'	=> '&PREHOOK_context_handlecsv',
  'ctan-o-mat'		=> '&PREHOOK_ctan_o_mat',
  'dynblocks'            => '&PREHOOK_flatten1',
  'easyfloats'		=> '&PREHOOK_flatten1',
@@ -4166,7 +4167,7 @@
 sub run_prehook {
   my $prehook = $prehook{$package};
   if ($prehook) {
-    print "\t PREHOOK: running $prehook\n";
+    print "\t PREHOOK: running $prehook in " . `pwd`;
     eval $prehook;
     die "$package failed in $prehook: $@" if $@;
     print "\t PREHOOK: finished $prehook\n";
@@ -4190,6 +4191,12 @@
   # do the copy.
   &SYSTEM ("$CP -r * $dest");
 
+  # allow for playing around after the copy. The prehook stuff was
+  # invented before the following special cases; not worth cleaning up.
+  # Many of them would be better as posthooks anyway.
+  &xchdir ($dest);
+  &run_prehook ();
+  
   my $docdir = "$dest/doc/$whichdocformat/$package/";
   &xmkdir ($docdir);
 
@@ -6134,6 +6141,11 @@
   # symlinks will get removed afterward by MAKEflatten.
 }
 
+sub PREHOOK_context_handlecsv {
+  print "PREHOOK_$package - remove top level\n";
+  &SYSTEM ("$MV handlecsv-context-suite/* .");
+}
+
 sub PREHOOK_ctan_o_mat {
   print "PREHOOK_$package - make .1 with pod2man\n";
   &prehook_pod2man ("Gerd Neugebauer", "$package.pl");
@@ -6751,7 +6763,7 @@
 }
 
 sub POST_context_contrib {
-  print "POST_context_contrib for $package - move top-level files file\n";
+  print "POST_context_contrib for $package - move top-level files\n";
   (my $context_package = $package) =~ s/^context-//;
   my $destdir = "$DEST/doc/context/third/$context_package";
   &mv_with_mkdir ("LICENSE", "$DEST/doc/context/third/$context_package");