Re: Problems with texlive-new's tpm2debcommon.pm

[Frank Küster <frank@kuesterei.ch>]

Norbert Preining <preining@logic.at> wrote:

> On Fre, 19 Jan 2007, Norbert Preining wrote:
>> Haeehhh... take a look at the tpm2deb.pl script in the (old) texlive
>> dir, it should be quite easy to add.
>
>>From the old: main + load_collection_tpm_data
>
> main        
> 	${Tpm::MasterDir} = $TpmGlobalPath;
>         $arch = "all";
>         $Tpm::CurrentArch = "i386-linux";
>
> load_collection_tpm_data
>
>         foreach $t ('TLCore', 'Documentation', 'Package') {
>                 my $subtree = ${Tpm::TexmfTreeOfType}{$t};
> 		foreach $f (<$Master/$subtree/tpm/*.tpm>) {
> 			$shortn = basename($f);
>                         $shortn =~ s,\.tpm$,,;
>                         if (($t eq 'TLCore') && ($shortn =~ m/^scheme-/)) { next; }
>                         my $tpm = Tpm->new("$subtree/tpm/$shortn.tpm");
> 			...
>
> Or did I misunderstand you???

Yes, the old script does "use Tpm", and in Tpm.pm the variable
Tpm::TexmfTreeOfType is defined, as well as the method Tpm->new.  We
need to copy code from Tpm.pm to tpm2debcommon.pm.

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