diff --git a/lib/LaTeXML/Engine/LaTeX.pool.ltxml b/lib/LaTeXML/Engine/LaTeX.pool.ltxml index bb23e61e2..27e7a2c48 100644 --- a/lib/LaTeXML/Engine/LaTeX.pool.ltxml +++ b/lib/LaTeXML/Engine/LaTeX.pool.ltxml @@ -5744,7 +5744,6 @@ sub latexChangeCase { else { push(@toks, $tok, $next); } } else { - Debug("SURPRISE: " . Stringify($tok)); push(@toks, $tok); } } return Tokens(@toks); }); } diff --git a/lib/LaTeXML/Package.pm b/lib/LaTeXML/Package.pm index 84b204ce9..d391a626e 100644 --- a/lib/LaTeXML/Package.pm +++ b/lib/LaTeXML/Package.pm @@ -642,9 +642,13 @@ sub NewCounter { NewCounter($within); } my $cs = T_CS("\\c\@$ctr"); my $prevdefn = $STATE->lookupMeaning($cs); - if ($prevdefn && ((ref $prevdefn) eq 'LaTeXML::Core::Definition::Register') - && (($$prevdefn{address} || '') =~ /^\\count/)) { - Info('unexpected', $cs, undef, "Counter $ctr was already allocated, skipping"); } + if ($prevdefn && ((ref $prevdefn) eq 'LaTeXML::Core::Definition::Register')) { + my $a = ($$prevdefn{address} || '') =~ /^\\count/; + ## Note: it is quite reasonable to redefine counters, + ## in order to change reseting & nesting. So, don't be noisy! + # Info('unexpected', $cs, undef, + # "Counter $ctr was already ".($a ? 'allocated':'defined').", skipping"); + } else { Warn('unexpected', $cs, undef, "Counter " . ToString($cs) . " was already defined as $prevdefn; redefining") if $prevdefn;