diff options
| author | Karl Berry <karl@freefriends.org> | 2014-12-05 18:45:04 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2014-12-05 18:45:04 +0000 |
| commit | a5633dfe988f2ff899a79436997ac2440bc6a562 (patch) | |
| tree | c003c5e20ee2c033b4aa2d058f528b161a1fb806 /Master | |
| parent | 7a799b19e715358bd9ef31854d30555fd55df73f (diff) | |
commented out debugging warn
git-svn-id: svn://tug.org/texlive/trunk@35751 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index 7bd98607626..ebdc2e22873 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -134,7 +134,7 @@ sub from_fh { $self->{'docfiledata'}{$f}{'details'} = $1; $self->{'docfiledata'}{$f}{'language'} = $2; } else { - warn "Unparsable tagging in TLPDB line: =$line="; + tlwarn("$0: Unparsable tagging in TLPDB line: $line\n"); } } } elsif ($lastcmd eq "binfiles") { @@ -800,7 +800,7 @@ sub update_from_catalogue { $tcdocfilebasenames{$tcdocfilebasename} = 1; # foreach my $tlpdocfile (@tlpdocfiles) { - warn "considering merge into tlpdocfile $tlpdocfile\n"; + #warn "considering merge into tlpdocfile $tlpdocfile\n"; if ($tlpdocfile =~ m,/$tcdocfilebasename$,) { # update the language/detail tags from Catalogue if present. if (defined($entry->docs->{$tcdocfile}{'details'})) { |