[tex-live] XML/DOM directory in Build/tools

[Frank Küster]

Frank Küster <frank at kuesterei.ch> wrote:

> Hi,
>
> can anybody tell me what the history of that directory is?  I'm trying
> to run a script that has been derived from the texlive scripts from
> outside the texlive tree (actually, from outside Norbert's Debianization
> tree which contains a copy of the Tools directory), and it only works if
> the XML subdirectory is copied along, even if XML::DOM is installed on
> my system.

Okay, I have investigated this.  The version in texlive seems to be
derived from upstream's version 1.42, it lacks a fix introduced in 1.43
that doesn't seem to affect us (either way).  The only changes are in
DOM.pm, not in the files in the DOM subdirectory.

It does have some additional features which could be summarized under
the keyword "beautification" (actually this is a variable name).  

With the upstream version, files extracted from the lists in the TPMs
may have trailing or leading whitespace, and if there's an empty entry
(like this: <TPM:DocFiles size="whatever"></TPM:DocFiles>), the list of
filenames contains an empty string (or a string with only whitespace).

There are some more beautifying changes which *add* whitespace, namely
indenting, but I didn't encounter a case where this affected me.

If you want to use the scripts with upstream's XML:DOM, this piece of
code might help:

    foreach (@RunFiles) { 
      s/\s//;
      s@^[\s\n]*(.*)[\s\n]*$@$1 at so;
      s@\n\s*@\n at gm;
    };

which is actually copied from the diff I get with upstream's XML::DOM. 

Can I assume that the changed Fabrice made are in the Public Domain and
submit it upstream?  Or is it GPL, or what?

Attached is a complete diff.  The hunk

@@ -4198,7 +4258,7 @@
 {
     my ($class, %args) = @_;
 
-    $args{Style} = 'XML::Parser::Dom';
+    $args{Style} = 'Dom';
     $class->SUPER::new (%args);
 }
 

Seems to be the (main? only?) change upstream made between 1.42 and
1.43. 

Regards, Frank
-- 
Frank Küster
Single Molecule Spectroscopy, Protein Folding @ Inst. f. Biochemie, Univ. Zürich
Debian Developer (teTeX)