my $pass = shift;
my $stack = shift;
my $state = shift;
-
+
+ # the @translationof macro provides the original English section title,
+ # which should be used for file/anchor naming, while the title will be
+ # translated to each language
if ($pass == 1 and $macro eq "translationof") {
if (ref($state->{'element'})=='HASH') {
$state->{'element'}->{'translationof'} = main::normalise_space($line);
}
- print "UNKNOWN: macro:$macro, line:$line, pass:$pass, stack:$stack, state:$state\n";
- print Dumper($stack);
- print Dumper($state);
return ('', true, undef, undef);
- }
- if ($pass == 2 and $macro eq "translationof") {
-# if (ref($state->{'element'})=='HASH') {
-# # $state->{'element'}->{'translationonf'} = $line;
-# }
- print "UNKNOWN: macro:$macro, line:$line, pass:$pass, stack:$stack, state:$state\n";
- print Dumper($stack);
- print Dumper($state);
- return ($line, 0, undef, undef);
} else {
return t2h_default_unknown($macro, $line, $pass, $stack, $state);
}