diff options
Diffstat (limited to 'Doc/perl/ltxmarkup.perl')
-rw-r--r-- | Doc/perl/ltxmarkup.perl | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/Doc/perl/ltxmarkup.perl b/Doc/perl/ltxmarkup.perl index 07e93ca..290e79b 100644 --- a/Doc/perl/ltxmarkup.perl +++ b/Doc/perl/ltxmarkup.perl @@ -15,13 +15,13 @@ sub ltx_next_argument{ sub do_cmd_macro{ local($_) = @_; my $macro = ltx_next_argument(); - return "<tt class=macro>\$macro</tt>" . $_; + return "<tt class='macro'>\$macro</tt>" . $_; } sub do_cmd_env{ local($_) = @_; my $env = ltx_next_argument(); - return "<tt class=environment>\$env</tt>" . $_; + return "<tt class='environment'>\$env</tt>" . $_; } sub ltx_process_params{ @@ -43,8 +43,8 @@ sub do_env_macrodesc{ local($_) = @_; my $macro = ltx_next_argument(); my $params = ltx_process_params(ltx_next_argument()); - return "\n<dl class=macrodesc>" - . "\n<dt><b><tt class=macro>\$macro</tt></b>" + return "\n<dl class='macrodesc'>" + . "\n<dt><b><tt class='macro'>\$macro</tt></b>" . "\n $params" . "\n<dd>" . $_ @@ -55,9 +55,10 @@ sub do_env_envdesc{ local($_) = @_; my $env = ltx_next_argument(); my $params = ltx_process_params(ltx_next_argument()); - return "\n<dl class=envdesc>" - . "\n<dt><tt>\begin{<b class=environment>$env</b>}</tt>" + return "\n<dl class='envdesc'>" + . "\n<dt><tt>\begin{<b class='environment'>$env</b>}</tt>" . "\n $params" + . "\n<br /><tt>\end{<b class='environment'>$env</b>}</tt>" . "\n<dd>" . $_ . "</dl>"; |