diff options
| -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'})) { |